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RAM-PACKS FLAP 

and when RAM packs flap, programs crash because of edgy connectors (so children! keep off!). 

Now East London Robotics offer a unique product:- 

TRADE IN YOUR ZX 81. 

Introducing the MAXIMEM ZX81. A ZX81 with 32k or 64k RAM fitted INSIDE the case (children come back!) 
MAXIMEM ZX81 - the most affordable 32 or 64k micro in the world. 


• J NEEClllW V--— 

MAXIMEM ZX81 

1 _ g% A PLUS ONE USED 

<*2k-£39 tk zxsi 

mm A PLUS ONE USED 

64k-£59 ik zxsi 

the " 

ZX81. The extra rnemon/ Uy n mcm ory. a nd does 

power ^ standard add-ons. such as 

not ° r ° ther interfaces ' 

printers. RbZJ ^ coun ter at our 

Trade in your ZXS'by k current delivery), 

premises. (Phone firstTo chec ^ workin g order 

power supplies etc. 

ZX SLOWLOADER £10 

Loads ZX81 tapes into your Spectrum. A recent letter 
describes it best. 


SP|gr £ 23 

32k MEMORY EXTENSION 

into 9 the »ck«7p[o“ded t»SkdM 1 £35 > 

standard 48k Soertnim f. u ,nc air anc * you have a 
Sinclair «** *" 

No soldering is req Jred^Tn, Z” 

The SP48 carries on, fnli '“J 0 '’*'“» 

csmSmm 

^“80-£46 

PAGED 64k MEMORY EXTFNCiniu 

air,d 9 „hXX S SP4 P 87Lr d l" dd '° nCOmpa ' lbl11 ''' 

be used as a standard 48k bu^so^^' 0 " £5 ° ) ' ** Can 
can switch to a second page of SkTth'^h Ct, '° nS 
recommended for the r! m !i . u A,thou S h r 


recommended"for^he conrnlete^h!^ Although not 
of tremendous benefit to the slriousu^r’^ Sf>8 ° ** 
I ~ —^Fit and Test Service: Al 

*5 


av»,u. . pi>r t-e X r^ e ^9ret 0l / r 


Part U «Ve r 

°«vner s . 


describes it best. 

Dear Sir. Just a line about your excellent Slowloader. 

I bought it because I was nearing the completion of a project which 
uses practically everything in 16k RAM including a string array (DIM 629,7) 
which took 4 hours hard graft to bash in. I really did not fancy doing it all again. 

SLOWLOADER twice found a tape-loading error. So I SAVEd again onto a short, high-quality tape - 

and this time it went straight in. Two minutes to take out the SLOW and FAST lines, 10 to renumber the PEEKs and 

POKEs, 20 to add some colour and a few BEEPs. and the thing was ready to SAVE again. What a little masterpiece! 


All product* on this order form are in stock at the time of going to press 
Same day dispatch for phoned Access and Visa orders 


To East London Robotics Ltd. Please send by re 
□ MAXIMEM 32k. (C39+ZX81) _ 


m (tick Items required). 


□ MAXIMEM 64k. (LS9-ZX8I) 
QSP48 (Issue" 1 ! £35) (Issue 2 £23) 


SP80 (Issue 1 £50) (Issue 2 £46) 


1 SLOWLOADER £10 


□ Free Catalogue (S AE only) 
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TRICKSTICK 


A revolution in computer games control, for one to 
eight players simultaneously. See our demonstration at 
the 8th ZX Microfair on 20th August at Alexandra 
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30 PROGRAM OF THE 
MONTH 

7 ERRORS AND 
MISHAPS 
LETTERS 

ZX-81 

8 INVADERS 

9 SNUFFLES 
12 GOLF 

19 MAZE ESCAPE 

20 HIGH NOON 

25 SPACE MISSION 

26 PERISCOPE 
29 BLOCK STOP 

32 SPACE GRAZE 

33 LASER BLAST 

38 ATLANTIC LANDER 

39 FALL THROUGH 
48 CONVERSATION 
51 MASTERMIND 


SPECTRUM 

11 PETROL 

CONSUMPTION 

LOGO 

21 TOUCH TYPE 

22 WASHING LINE 

24 HIT STAR 

27 NOUGHTS AND 
CROSSES 

30 LABYRINTH 

34 POKER 

36 STAR CATCH 

37 SPECVADERS 

40 ALPHA ATTACK 

41 TANK DUEL 
47 PATHWAY 
50 OLYMPIA 

52 FRYOLITES 
54 COUNTING 


To help with entering graphic, character, we have adopted a system of writing the character, for the ZX-81. We indicate invene character, 
by the letter i and graphic, by g, so that an invene leller W is shown as iW and the graphic, character on key 6 i, denoted by g6. 
Space, are shown by »p and mvenc space, are up. If some occur together, for instance a row of tin spaces, they arc shown by 6 * sp and 
where there is a combination of character, each one is divided by a colon, thus sp:np:6 * g6 mean, a space followed by an invene space and 
then six characters on the 6 key. 

Where whole words are written in inverse letten they appear in ihe linings as lower-case letters. 

In the Spectrum listings, letters to be entered in graphics mode are underlined, while other graphics instruction, are underlined and take 
the form shown above, with ihe addition that inverse graphics charaders are represented by the letten “ig'\ 

The changes continue. Following our decision to publish Sinclair Programs monthly and make a special 
award for the best program each month, wc have decided to make another attempt to encourage better 
programming. 

From this issue we shall publish only 30 programs instead of the 40 which have been included 
previously. The move was made necessary partly by you, our readers, who sent us many programs 
which, despite their quality, we were unable to use because of their length. With more space for longer 
programs we will print more complicated listings which your letter, tell us arc needed. 

We also intend to begin publishing machine code listings. We have one in this issue for a Space 
Invaders game and we will be looking for more in the coming months. Please enclose a complete listing 
with all machine code programs. 
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PROGRAMMABI 


JOYSTICK INTERFAC 

for 




Spe< 

81 


PACKAGE CONTENTS SUPPLIED 


Surpassing the outstanding specification of 
our Interface Module II which still offers 
the best software support at its price, a 
Joystick Interface that is compatible with 
ALL SOFTWARE through its unique hard¬ 
ware programmable design. 


Programmable Interface Module as illus¬ 
trated, complete with clip-on program¬ 
ming leads. 


Self adhesive programming chart detailing 
how to define which key is simulated by 


TOTAL SOFTWAR 
COMPATIBILITY ! 


The Interface plugs on to the rear connector 
of your ZX81 or ZX Spectrum. 


Quick clip-on connections, which are con¬ 
figured from a reference card supplied, allow 
you to define which of the forty keys are 
simulated by which action of the Joystick. 
A pack of ten Quick Reference Programming 
Cards makes setting for your favourite games 
even easier. These can be filled in to show at 
a glance the configuration required and 
stored in the cassette case of the particular 
game. When you change to a game using 
different keys the module is re-programmed 
in a few seconds. 

As with our Interface Module II the Pro¬ 
grammable Interface accepts all standard 
switch Joysticks that are Atari-compatible. 
Two sockets are available which are con¬ 
nected together for two player games which 
use the same keys for both players. 

The Interface resides in the keyboard 
address space and does not affect its opera¬ 
tion or interfere with any other add-ons. A 
rear extension edge connector will accom¬ 
modate expansion of your system. 

The unique AGF key simulation principle 
makes it extremely easy to incorporate 
Joystick action in your own programs. All 
eight directions and fire are read by simple 
BASIC. 


Ji key is simulated by 
UP, DOWN, LEFT, RIGHT, and FIRE. 
This can be fixed on to the case of your 
computer or if preferred the protective 
backing can be left on. The chart is made 
of a very durable reverse printed plastic 
and is extremely easy to *ead. 

One pack of ten Quick Reference Pro¬ 
gramming Cards for at-a-glance setting 
to your games requirements. The card 
allows you to mark the configuration in 
an easy to read fashion with space to 
record the software title and company 
name. 


trate how all eight directions and fire 
can be read. This is also a useful high 
resolution drawing program. 

12 months guarantee and full written 
instructions. 



CK§ 


With every order comes a free demonstration 
program called 'Video Graffiti’ plus a full 
set of instructions. 


ATARI 

CONTROLLERS \_ 

FOR USE WITH OUR INTERFACE 
Module or VIC 20, Commodore 64, 
Atari VCS, Atari 400, Atari 800 
If you require extra Joysticks for our 
original interface module mark order 
‘OLD’ Joysticks 

ONLY £7.54 inc VAT + P&P 



FROM: MR/MRS/MISS 

ADDRESS 



SEND C.W.O. (NO STAMP NEEDED) TO: A.G.F. HARDWARE, DEPT. 

FREEPOST, BOGNOR REGIS, WEST SUSSEX P022 9BR 

QTY 

ITEM 

ITEM PRICE 

TOTAL 


PROGRAMMABLE INTERFACE 

33.95 



PACK(S) QUICK REFERENCE CARDS 

1.00 



INTERFACE MODULE II 

20.95 



JOYSTICK(S) 

7.54 



SOFTWARE AS TICKED ON LIST 




SOFTWARE AS TICKED ON LIST 



ONE 

VIDEO GRAFFITI 

FREE 


ZX81 □ ZX SPECTRUM □ Please tick 

FINAL TOTAL 

DEALER ENQUIRIES WELCOME EXPORT PRICES ON APPLICATION 
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NEW! 


KEY FEATURES 

■ Any Five key configuration 

programmed onto joystick 

■ Accepts all Atari-compatible Joysticks 

■ Rear connector for any other add-ons 

■ Use will not affect Sinclair guarantee 

■ Full instructions & 12 month guarantee 


KEY 

* Proven cursor key simulation for 

maximum software support 

* Accepts Atari, Competition Pro, Wico, 

Starfighter, Quick Shot, Le. Stick, etc. 

* Second Joystick facility 

* Eight directions programmed in simple 

BASIC 

* Rear extension connector for all other 

add-ons 

* Free demo program, ‘Video Graffiti’ + f 

instructions 


JOYSTICKS 


ZX SPECTRUM 


INTERFACE II COMPATIBLE SOFTWARE 


Hewson ... 
Consultants 


ApocoJypse 
Software ... 
Axis 

Blaby Comp. 
& VkL ... 


Spookyman 
Invasion 
Harrier 
Cosmos 
The Android Run Imagine ... 
High Noon Micromania 

ETX New Gener- 

Mazeman atjon 

The Wizards Software 

Warriors Newsoft ... 

Products 

Galactic Jailbreak Psion 
Labyrinth 


Chopper Rescue 
Gold Digger 
Confusion 


Campbell 
Systems ... 

CDS Micro 
Systems ... 

GTech ... 

DJL Software^ Froggy 
DK Tronic* □ 3D Tanx £4.95 
Meteoroids 

* State "A GF version ” 


Gulpman 


Leapfrog 

Specman 


Nightflite 
Specvaders 
Mazechase 
Star Trail 
(Man.Dock) 
Zzoom 

Ghost’s Revenge 

□ Escape £4.95 

□ 3D Tunnel £5.95 

□ Knot in 3D £5.95 
Time Bandits 
Spectral Maze 
Flight Simulation 
VU-3D 
Meteor Storm 
Space Intruders 
Gnasher 
Spectapede 

_ Ground Attack 

□ Cyber Rats £5.95 

vectis ... Pony Express 

Software Vec-Man 

LATEST ADDITION 

Digital Integration- 

Night Gunner & Fighter Pilot 

"PLUS 21 ZX81 Titles" 


Quicksilva 


Software 
Silversoft... 


trum 


IMPORTANT: 

This product is not software 
programmed and guarantees 
eight direction Joystick 
response in machine 
code and BASIC 


programs. 


JOYSTICK 
INTERFACE H 

for 

Sinclair ZXr um 
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BOGGLES 
PONTOON 
SKI JUMP 
HANGMAN 
OLD BONES 
THIN ICE 


DIRECT MAIL ORDER FORM' 


COMPUTER 


DONTMISS THIS INCREDIBLE OFFER! 

50 GAMES £9 95 (fft ! 

CASSETTE 50 FOR YOUR MICRO 

> ss^ss*“ saw ss.„ 

7 LUNAR LANDER MOTORWAY PLANETS oL .JV’Cr- " 

\\ PLASMA BOLT FORCE HELD BL ACK HOLE 1 J 

\\ STARTREK N.M DYNAMITE 4?V / 

C\v ^ ^ rv en \\ RADAR LANDING FUNNEL ESCAPE DO YOUR SUMS f* pVSjfl 

vA cCETtE 50 ATTACKER BARREL JUMP DERBY DASH I R IQH mSJBSH, 

r -\ \ GALACTIC DOGFIGHT CANNONBALL HAT l L F SPACE SEARCH lt~ 

— r « A -- UION ATTACK OVERTAKE UNIVERSE 

1"- - IVASIV f ACTION SITTING TARGET rats C " .o^. ^ .._. 

A' „ / VG \ 0X0 SMASH THE WINDOWS r anil f r .1 Mfcrti — --- m- 


m*. 


ORBIT TER SUBMARINES 

motorway S r r s LAUNCM 

FORCE FIELD black hole 

SlJItEJCJPE S^JiuMs/ 

ErF BA ” te = y -a s rch k 

srnina target yug ™ 

SMASH I HE WINDOWS tanker a 
spacElShip parachute g 

Phaser JETMOBILE W 

'£*%»" jL * 

— exchange C 


A/OW AVAILABLE FOR 

Sinclair- VIO^J 
SPECTRUM JP 

zxai V ( 

LYNX OR 1 C -1 g| 

DRAGON 

ATARI 


SUPPEKCASSETTESO 

■ SOFTWARE I enclose cheque/P O 


^cipplc 


003 A: B 


■ CASCADES HOUSE 
3 BARGAN’S LANE 
3 LLANDOGO 
GWENT 

S. WALES NP54PA 


SOFTWARE 

WRITERS 


If you write programs for the Spectrum or ZX81, are you being 
paid what you are worth? 

Having written a program which you think has potential, what 
then? Send it to a software house and hope they are honest? 
Market it yourseff and risk thousands of pounds? Put it away in 
a drawer? 


We are a professional marketing company, interested only in 
obtaining the highest rewards for software writers. We are not 
connected with any hardware or software manufacturers and 
deal with writers in total honesty. Most importantly, we can 
secure deals for them, worldwide, which are way ahead of 
anything they could negotiate themselves. 


If you have written a program, for any Sinclair computer, 
which you think could be commercial, send it to us on tape for 
evaluation. We will advise you, free and without the slightest 
obligation, on the commercial prospects for your program. 


NEIL GIBSON,( COMPA NY 


Neil Gibson Et Co., 

42, Abbeygate Street, 
Bury St. Edmunds, 
Suffolk 


QUEST I 

MICROSOFTVUARE 


the battle could be yours... 
...but it won’t be easy! 

Totally original game plan. Addictive, 
challenging and offering a complete 
visual experience with its animated 
graphics and violent explosive effects. 
Compatible with ALL leading joysticks. 

available NOW from 

YOUR LOCAL SOFTWARE RETAILER | 

shed or direct from__ 

QUEST MICROSOFTWARE, 119 THE PROMENADE, | 
CHELTENHAM, GLOS.GL50 1NW 

ring 0242-585661 

QUEST...I 

...SIMPLYTHE BEST 
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AS I BROWSED through 
the magazines at my local 
newsagent, my eyes clamped 
on a yellow and pink cover— 
what great colours. I bought 
it immediately and ran the 
mile home in two seconds 
flat. I went upstairs to my 
room, ripped ofF the cassette 
neatly and peered inside the 
magazine. At that point disas¬ 
ter struck—more and more 
48R Spectrum games. 

I read on and found that 
there were only a few good 
16K Spectrum games and all 
the 48K games were of good 
quality. 

The 16K Spectrum games 
in your magazine are becom¬ 
ing very rare, so you had 
better put 16K games in your 
magazine in equal proportion 
to the 48K, or my mates and 
I will give you a good past¬ 
ing. 

Mark Sargusingh, 
London NW9. 


The greatest 

YOU ARE the greatest. You 
brighten me up every month 
with your programs. I like 
everything about the maga¬ 
zine. It is the only one which 
is read nearly every day. 


What I think is a good idea 
would be to have a pull-out 
poster of a big program. 

Yours gratefully for the 
best computer magazine. 

Carl Marson, 
Debenham, 
Suffolk. 

Over-stated 

I BUY Sinclair User and Sin¬ 
clair Programs every month. I 
would like to know the point 
of putting such statements as: 

10 GOTO VAL “50” 

OR 

10 GOTO CODE “COS” 
Why (in the first example) 
cannot you print 

10 GOTO 50 

Why in the second example 
do you not print 
10 GOTO 179—this being 
the relevant code. 

We all know that the longer 
the statement the more mem¬ 
ory it uses, so why use this 
method? 

I would also like to point 
out that Play School is a pro¬ 
gramme and Asteroids is a 
program. Many people are 
confused with the spelling of 
these two words. 

Mark Mills (aged 13), 
Lytham St. Annes, 
Lancashire. 


Misled 

I THINK that your adver¬ 
tisement on page 44 in the 
May issue of Sinclair Pro¬ 
grams is rather misleading. 
You say at the top of the 
advertisement that for 95 
pence you can get hours of 
fun, intellectual satisfaction, 
and educational programs. At 
the bottom of the advertise¬ 
ment you wrote Sinclair 
Programs— 12 issues—price 
£13.20. If you multiply 95 
times 12 your answer is 
£11.40. 

Can you please tell me 
where the bonus £2 has gone? 
Is it postage? If it is, why is 
that not written somewhere 
in the advertisement? 

Ian Bryant, 
Fleet, Hampshire. 

• As you suggest, the extra £2 
is to cover postage costs, in 
common with all other maga¬ 
zines. We consider it worth¬ 
while for subscribers to pay the 
extra amount to ensure receiv¬ 
ing their copies of the maga¬ 
zine. 

Plea for more 

IN BUYING the new 
monthly issue of Sinclair Pro¬ 
grams, I found that most of 


the programs were very en¬ 
joyable to play and enter. I 
have a ZX-81 which is a very 
good computer but I wish 
that there could be more 16K 
programs. 

I found that the best pro¬ 
gram was Fruit Collector, 
which is difficult to master 
but has easy listing to put in 
the computer. 

I am one of many who are 
learning how to use the ZX- 
81. I would be very grateful if 
you would put in more 16K 
programs and not as many 
IK programs. 

The Best of Sinclair Pro¬ 
grams was very enjoyable and 
entertaining. 

Daniel Ferrier (aged 13), 
Louth, Lines. 


Rio bound 

REGARDING Sinclair Pro¬ 
grams, I really feel that I have 
no need for computer games; 
after all, it is a computer and 
not a video games machine, at 
least not full time. 

Hubert Melin, 
c/o General Motors do 
Brasil, Av. Augusto Se- 
vero 8-8th, 20.021 Rio de 
Janeiro, Brazil. 


ERRORS AND 
MISHAPS 


O NE CORRECTION to the 
May issue was not included in 
our last issue. The last line of 
Climber on page 29 was omitted. It 
should have read: 

300 PRINT S 

A smudge in the listing of Deploy¬ 
ment Strategy— June, page 47— 


caused problems for many of our read¬ 
ers. Line 1030 should have read: 

1030 PRINT A$(l +(21-I)/20, 1 TO 
A(P)) 

Beat the Barrage— June, page 36— 
caused problems for people trying to 
program line 750. It read: 

750 READ b: POKE USR a$ + a,b 
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L ESLIE ROBINSON and Trevor 
Leeming of Rotherham, South 
Yorkshire have speeded this short 
space invaders program by writing part 
of it in machine code. The object is to 
kill as many space invaders as possible 
before you run out of fuel or your laser 
over-heats. 

To enter the program first enter the 
short program lines 1 to 80. RUNning 
that should produce two quotation 
marks at the bottom of the screen. Next, 
the three columns of numbers should be 
entered. Enter each two digits separate¬ 
ly and work horizontally across the 
columns. Thus you would begin by 
typing 2A ENTER and proceed to type 
0E ENTER. 

Once all that data has been typed-in, 
RUN ihe program again to place all the 
machine code in line 1. Lines 10 to 80 
should then be deleted. The remaining 
line 1 containing the machine code 
should then become line 1 of the main 
program (16K ZX-81). 



1 REM ZZZZZZZZZZZZZZZZZZZZZZZ 

zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz 

zzzzzzzzzzzzzzzzzzzz 

10 LET R*- M " 

20 FDR X s * 16514 TO 16588 
30 IF R*="" THEN INPUT R* 

40 POKE X,16*C0DE A*+CODE R*< 2 
>-476 
50 SCROLL 

60 PRINT X," ";R$< TO 2> 

70 LET fl*»A*<3 TO > 

80 NEXT X 


2 GOTO 2000 
LET HS=0 
LET XX-0 
LET H*»"??????" 

LET Q=Q 
LET SCORE-0 
LET R=10 
LET L*0 

LET 8*1NT (RND*28> 

PRINT RT 21,0;"HIGH SCORE-" 
" BY ";H$ 

PRINT RT 4,B;"<sP = i* = £P>" 
LET R=R+<INKEY*-"8" AND R<2 
INKEY*-"5" RND R>2> 

'"PRINT RT 19, R-2; "< sP ! 93 ! Qw • 

; RT 18,R; 

IF INKEY*-"0" THEN LET L-US 
514 

IF INKEY*-"0" THEN LET XX*X 

IF XX-50 THEN GOSUB 600 
IF LOO THEN LET SCORE-SCOR 

IF L=0 THEN LET Q-Q+l 
IF Q>500 THEN GOTO 10O0 
IF Q>400 THEN GOSUB 500 
IF RND>.95 THEN GOSUB 700 
GOTO 30 









500 PRINT AT 0,0;"FUEL LOW";AT 
0,0;"fuel low" 

501 RETURN 

600 POR F='l TO 100 

605 PRINT AT 0,15;"LA2ER OVERHE 
ATED ";AT 0,15;;"1azer overheat© 
d" 

606 LET Q~Q+.2 

620 NEXT F 

630 PRINT AT 0,15;"LAZER OPERAT 
IONAL 

635 LET XX=0 

640 RETURN 

700 PRINT AT 4,0;" 

701 FOR 2=26 TO 0 STEP -2 

704 PRINT AT 2,2;"(94 5 i*«9w«sP« 
sP >" 

705 LET A=A+<INKEY*="8" AND A<2 
9)-<INKEY$»"5" AND A>2> 

706 PRINT AT 19,A-2;"<sP : 93 : 9w : 
sP)";AT 18,A; 

707 IF INKEY*»"0" THEN LET L*US 
R 16514 

710 IF L< >0 THEN LET SCORE=SCOR 
E+15 

711 IF L< >0 THEN PRINT AT 2,2;" 

712 IF L< >0 THEN RETURN 


720 NEXT 2 

721 PRINT AT 2,0;" 

722 RETURN 

1000 PRINT AT 0,0;"YOUR TIME IS 
UP YOU KILLED SCORE;" ALIENS 

ii 

1010 IF SCORE>HS THEN PRINT "YOU 
HAVE ATAINED THE HIGH SCORE" 

1015 IF SCORE>HS THEN PRINT "PLE 
R8E TYPE IN YOUR NAME FOR QTH 
FRS TO LOOK AT AND WONDER" 

1016 ir SCOPE>HS THFN TWPIIT H* 
1020 IF SCORE>HS THEN LET HS*SCO 
RE 

1025 FOR F=0 TO 100 

1026 NEXT F 
1028 CLS 
1030 GOTO 10 

2000 PRINT "SPACE INVADERS 

KILL AS MANY AS YOU 
CAN BEFORE YOUR FUEL RUNS OUT 
USE TO MOVE 

5 LEFT 

8 RIGHT 

0 TO FIRE LAZER" 

7004 PAUSE 2000 

7005 CLS 
7806 GOTO 3 
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T HE OBJECT is to collect as 
many honeypots as possible from 
the tree on the left of the screen. 
To get a honeypot you must jump over 
the rolling boulders, the hole and the 
wall. Once you are under the honeypot 
it will fall down to you. Move left with 
“5”, right with “8” and jump with 
“ 0 ”. 

Snuffles was written for the 16K 
ZX-81 by J Hallett of Helston, Corn¬ 
wall. 



l 

DIM 

f1$<: 12, to 


28 

IF I$=*"0" THEN LET Y-Y-l 



LET 

SO0 


29 

IF I*="0" THEN LET X*X~1 


6 

LET 

Y-23 


30 

IF I*«"8" THEN LET Y=Y+1 


1? 

LET 

F-C 


31 

PRINT RT X,Y;" 8 


10 

LET 

RS< 1 >•=■"< 2* 

sp • 4*9h • 2*sP > 

32 

LET F-F+l 

II 





33 

PRINT RT 8,11; "<95>" 


11 

LET 

fl*< 2 )•**«< s.P 

G*9h•sP >“ 

34 

IF X*8 AND Y“1Q OR Y»F THEN 


12 

LET 


GOSUB 1900 


13 

LET 

A*< 4 -=.p 

* 6*9h • sp 

35 

PRINT RT X-1,Y;" 


14 

LET 


sP ; 4*9h : 2*sP > 

36 

IF F>-25 THEN LET F=6 

II 





37 

IF Y»15 RND X~8 THEN GOSUB 


15 

LET 

R$< 6 >*"< 3* 

sP■98 : 95«3*sP 

2000 


> 





38 

IF Y~5 THEN GOSUB 3000 


16 

LET 

fl*<7 >«"<3*ftP•98•95•8*sP 

39 

PRINT RT 8,25;" 

y 





48 

GOTO 23 


17 

LET 

R*<8 >*"<3* 

sP = 98 : 95 • 3*SF‘ 

1000 
sa II ; Qf 

PRINT RT 10,10;"SPLRT.SCORE 

>' 

18 

LET 

A*<9 3* 

SP•98'95•3*sP 

1020 

STOP 


•< 




2000 

PRINT RT X,Y;" ";RT X+ 


19 

FOR 

N*1 TO 9 


1, Y+l 

.;"8";RT 10,10;"RRRGH- SCORE- 


20 

PRINT A*KN> 


"; SC 



21 

NEXT N 


2028 

STOP 


22 

PRINT AT 9,0;" 

<16*97 : SP•14* 

3000 

PRINT RT 4,4;"<9h)";RT 8,5; 

9‘ 

?>” 




"U" 



23 

LET 

X*8 


3010 

PAUSE 100 


24 

PRINT RT 4,4;" 

U" 

3020 

LET SC«SC+10 


25 

PRINT RT 8,F;" 

0" 

3030 

CLS 


26 

LET 

IINKEY* 


3040 

GOTO 5 


27 

IF 

I*-"5" THEN 

LET Y“Y-1 




10 
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LOGO 


I BILLUPS of Crewe, Cheshire, has 
written a useful routine for display¬ 
ing titles, slogans or logos on the 
16K Spectrum. Once it is run it re¬ 
quires an input of fewer than 30 charac¬ 
ters. 

It will then display them at the centre 
of the screen by “shooting” them in 
from random directions in different col¬ 
ours and with various notes. 


10 

PRPER 0> BORDER 0 CLS 

140 

NEXT tv RETURN 


230 

NEXT r > 

■ RETURN 


20 

INPUT a* 

150 

FOR ft-20 TO 10 

STEP -1' REM 

240 

FOR n« 

1 TO 10' 

REM NW 

30 

IF LEN a*>30 THEN GO TO 10 

S 



250 

PRINT 

INK 5;RT 

TV X+1-10+TV a 

40 

LET x-INT < 31-LEN a*V2 

160 

PRINT INK 6.;RT 

tv x+l ; a*< l >j 

*< 1 > ; 

RT t»-1 

,x+1-11+tv" " 

50 

FOR l-l TO LEN a* 

RT r>+l/X+l; " " 


260 

NEXT ti 

' RETURN 


60 

LET 9-INT <RND*7>*30+120 

170 

NEXT tv RETURN 


270 

FOP T.-20 TO 10 

STEP -1 ■ REM 

78 

IF <x+l >20 FIND 9 >200 > OR <x 

180 

FOR n-30 TO x+1 

l STEP -1' RE 

SE 




+ K10 AND 9>200> THEN CO TO 60 

M E 



2e0 

PRINT 

INK 6;RT 

TVX+1-10+TVA 

00 

GO SUB 9 

190 

PRINT INK 5;RT 

10,ma*< 1 >+" 

*< t >j 

RT TH-1 

/X+1-9+TV 


90 

BEEP .1-Kl-LEN «$>*2,9-'10 




290 

NEXT t> 

' RETURN 


100 

NEXT 1- CLS GO TO 50 

200 

NEXT r> RETURN 


300 

FOR n- 

1 TO 10' 

REM NE 

110 

REM ****Subroutines**** 

210 

FOR r>-20 TO 10 

STEP -1> REM 

310 

PRINT 

INK 7;RT 

Tvx+l+10-rva 

120 

FOR Ti-1 TO 10' REM N 

SW 



*< 1 >. 

iRT n-1,x+l+l1-rv " " 

130 

PRINT INK 7jRT rvx+l;a*<l>> 

220 

PRINT INK 4 j RT 

rv x+l+10-n; a 

320 

NEXT T> 

' RETURN 


AT tv 

-l,X+li" " 

*< 1 >/ 

RT n+l,x+l+9-r>; 
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O UR GOLF 80 program in the 
January /February issue has al¬ 
ready provoked an upgrade tor 
the 16K ZX-81. Robert Veal of Tran¬ 
ent, East Lothian, has expanded the' 
game to provide bunkers, trees and 
similar hazards, as well as a full range of 
available clubs and putters. 

The program is conducted through 
displayed instructions and reports and 
provides a remarkably challenging 
game. (16K ZX-81). 






| 30 CLS 

40 FAST 

50 let y-e 

60 LET A-l 
70 LET F=0 
90 LET H-0 
90 LET B-0 
100 LET P-0 
120 LET M-RND 
130 IF MC.18 THEN LET P-3 
140 IF P-3 THEN GOTO 190 
150 IF MC.2 THEN LET P-5 
160 IF P-5 THEN LET D-INT (RND* 
75 >+476 

170 IF M>«.2 THEN LET P-4 
190 IF P-4 THEN LET D-INT (RND* 
224>+251 

190 IF P-3 THEN LET D-INT (RND* 
145>+105 
220 LET D*-" " 

230 IF DOl THEN LET D*-"S" 

240 PRINT ,,,,"HOLE " ;A;" **** 

"; D;" YARD";D»;" TO PLOY" 

250 PRINT ,,,,"PAR ";P 
270 IF HOI THEN PRINT , ,,, "SEL 
ECT CLUB M "l"" TO '"'l3"" 
290 IF H-l THEN GOTO 340 
290 INPUT W 
300 CLS 

310 IF W>13 THEN GOTO 220 
320 GOSUB 4000 
330 GOTO 390 

340 IF H-l THEN PRINT , ,,,"ENTE 
R PUTT DISTRNCE ""l"" TO ""17"" 

350 INPUT E 
360 CLS 

370 IF E>17 THEN GOTO 220 
380 GOTO 4500 
390 LET M-PND 

400 IF M<.03 THEN GOTO 3000 
410 IF M<.05 THEN GOTO 1000 
420 IF M<.1 THEN GOTO 1500 
430 IF M<.15 THEN GOTO 2000 
450 IF M<.2 THEN GOTO 3500 
580 LET D-D-T 
590 LET B-B+l 
60O LET D*-" " 

610 IF T< >1 THEN LET D*-"S" 

620 PRINT , , "STPOKE ";B,T;" YAR 
D”; D* 

630 IF D>-1 THEN GOTO 680 
640 LET D—D 
650 LET D*-" " 

660 IF DOl THEN LET D*-"S" 

670 PRINT , . ,,D;" YRRD" ; D*. ; 11 P 
AST HOLE" 

680 IF D-0 THEN GOTO 725 
700 IF D<18 RND D>-19 THEN PRIN 
T , , , ."YOUR BALL IS ON THE GREEN 

710 IF D<18 RND D>-19 THEN LET 
H-l 

720 GOTO 220 

725 IF D-0 AND B=1 THEN GOTO 91 

0 

730 IF B>P THEN PRINT , ,,,"BOGI 
E "; B, B-Pj" OVER" 

740 IF B-P THEN PRINT ,,,,"PRP 

" j B 

750 IF B-P-l THEN PRINT , ,,," * 
BIRDIE "jB;" *" 

760 IF B-P-2 THEN PRINT ,,,," * 
* EAGLE "; B;" **” 

780 LET X-X+B 

790 LET F-F+P 

800 LET A-fl+1 

810 IF A-19 THEN GOTO 850 

S20 PAUSE 300 

830 CLS 

840 GOTO 80 

850 PRINT ,,,,"COURSE PAP",F 
860 PRINT ,,,,"YOUR SCORE’SX 
870 IF X-F THEN PRINT ,,,,"LEVE 
L PAR" 

880 IF X>F THEN PRINT , ,,,X-Fj" 
OVER" 

885 IF X>F+5 THEN GOTO 2400 
890 IF X<F THEN PRINT ,,.,F-X;" 

UNDER","WELL DONE" 

895 IF X+4<F THEN GOTO 2450 


900 STOP 
910 SLOW 

920 FOR Q-l TO 10 
930 PRINT RT 18,9;"CONGRRTULRTI 
ONS" 

940 PRINT RT 18,9;"CONGRRTULRTI 
ONS” 


970 PAUSE 200 
980 FAST 
990 CLS 
995 GOTO 730 
1020 LET D-D-T 
1030 LET B-B+l 
1050 IF D<25 THEN GOTO 600 
I860 CLS 
1070 GOSUB 2500 
1080 LET M-RND 

1090 IF M>.5 THEN PRINT ,,,,”*** 
** YOUR BALL IS IN DEEP WATEP*** 
** YOU MUST PICK OUT RT THE *** 
** COST OF ONE STROKE." 

1100 IF M<-.5 THEN PRINT 
*** YOU HAVE LANDED IN SHALLOW** 
*** WATER. YOU CAN PLAY IT. ** 
*** YOU MRY PICK IT OUT BUT IT** 
*** ADDS ONE STROKE." 

1110 IF M<».5 THEN GOTO 1150 
1120 PAUSE 200 
1130 CLS 
1140 COTO 590 

1150 PRINT ,,,," DROP OUT (0> 

OR PLAY <P>" 


1180 IF B*-"0" THEN GOTO 590 


1200 INPUT U 

1205 IF W<10 OR W>13 THEN GOTO 1 
190 

1210 GOSUB 4300 
1220 CLS 
1230 LET M-RND 
1240 IF M<.85 THEN GOTO 580 
1250 PPINT ,,,,"YOU APE STILL IN 
THE WATER.",,,"PLAY AGAIN." 

1260 LET B-B+l 

1270 LET T-0 

1300 GOTO 1190 

1510 LET D-D-T 

1520 LET B-B+l 

1540 IF D<25 THEN GOTO 600 

1550 CLS 

1560 LET M-RND 

1570 IF M>-.5 THEN PRINT "**#** 
THAT WAS A TERRIBLE SLICE.*****” 

, .’’***** YOUR BALL IS IN THE TRE 
ES.*****" 

1580 IF M<.5 THEN PRINT "***** Y 
OU PULLED THAT INTO THE *****’’, 

."***** TREES.",,"*****" 

1590 GOSUB 2508 

1600 PPINT ,"SELECT CLUB ""10 
.... T0 ""!3"". 

1610 INPUT W 
1620 CLS 

1630 IF W<10 OR W>13 THEN GOTO 1 
590 

1640 G0SU8 4100 
1680 LET M-PND 
1690 IF M<.95 THEN GOTO 580 
1700 PPINT "YOU HAVE HIT A TREE. 
PLAY AGAIN." 

1710 LET T-0 

1720 PAUSE 200 

1730 CLS 

1740 LET B-B+l 

1750 GOTO 1590 

2010 CLS 

2020 LET D-D-T 

2030 LET B-B+l 

2050 IF D<18 THEN GOTO 600 

2060 GOSUB 2500 

2070 PPINT , , , , "**.*.** YOUR BALL 
IS IN A BUNKER. ***.**",,"***** S 
ELECT CLUB ""10"" TO ""13""." 
2080 INPUT W 
2090 CLS 


2100 IF W<10 OR W>13 THEN GOTO 2 
060 

2110 GOSUB 4300 
2120 LET M-RND 
2130 IF M<.95 THEN GOTO 580 
2140 PRINT ,,,,”***** YOU FAILED 
TO GET OUT. ***** TRY AGAIN. 

2150 PAUSE 200 
2160 LET T-0 
2170 LET B-B+l 
2180 CLS 
2190 GOTO 2060 

2400 PRINT ,,,,TAB 7;"THAT WAS T 
ERRIBLE.",,,"I SUGGEST YOU CHECK 
YOUR CLUB""DISTANCES. OR GET 
SOME TUITION." 

2410 PAUSE 300 
2420 CLS 
2430 GOTO 5100 

2450 PRINT ,,,,TAB 5;"THAT WAS R 
ATHER GOOD.",,," I 8ET YOU CANNO 
T DO IT AGAIN." 

2460 PAUSE 300 
2470 CLS 
2480 GOTO 1 
2510 LET D*-" " 

2520 IF TOl THEN LET D*="S" 

2530 PPINT ,,,,"STROKE ”;B,Tj" Y 
ARD">D* 

2540 LET D*-" " 

2550 IF DOl THEN LET D*-"S" 

2560 PRINT , , , ,"HOLE "jR;" **** 
”;D;" YARD";D*j" TO PLAY" 

2570 PRINT ...."PAP ";P 

2580 RETURN 

3010 LET D-D-T 

3030 IF D<30 THEN GOTO 590 

3040 CLS 

3050 LET D-D+T 

3060 LET B-B+l 

3070 LET M-PND 

3080 IF M>-.5 THEN GOTO 3110 
3090 PPINT "***** YOU HAVE HOOKE 
D YOUR SHOT ***** INTO THE TREES 
AND CANNOT ***** FIND IT." 

3100 GOTO 3120 

3110 PRINT "***** YOU HAVE SLICE 
D INTO WILD ***** ROUGH. YOUR BA 
LL IS LOST." 

3120 PPINT "***.**" 

3130 PPINT "***** YOU LOSE SHOT 
AND DISTANCE" 

3140 PAUSE 200 

3150 CLS 

3160 LET T-0 

3170 GOTO 590 

3510 CLS 

3520 LET D-D-T 

3530 LET B-B+l 

3550 IF D<25 THEN GOTO 600 

3560 LET M-RND 

3570 IF M>.9 THEN GOTO 3600 

3580 PRINT "***** YOUR BALL IS I 

N THE ROUGH.*****".,"***** SELEC 

T CLUB ""8"" TO ""13"»." 

3590 GOTO 3610 

3600 PRINT "**.**.* YOUR BALL IS I 
N THE GORSE.*****",,"***** SELEC 
T CLUB ""12"” OR ""13""." 

3610 GOSUB 2500 
2C20 INPUT w 
3630 CLS 

3640 IF W<8 AND M<.9 THEN GOTO 3 
610 

3650 IF M<.9 THEN GOSUB 4080 
3660 IF M>«.9 AND W<12 THEN GOTO 
3618 

3670 IF M>-.9 THEN GOSUB 4120 
3720 GOTO 580 

4010 IF W-l THEN LET T-INT (RND* 
65>+185 

4020 IF W-2 THEN LET T-INT (RND* 
55>+175 

4030 IF W-3 THEN LET T-INT (RND* 
35>+160 

4040 IF W-4 THEN LET T-INT (RND* 
25>+150 

4050 IF W-5 THEN LET T-INT (RND* 
20>+135 

4060 IF W-6 THEN LET T-INT (RND* 
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20>+120 

4070 IF W-7 THEN LET T-INT (RND* 
25)+100 

4080 IF W-8 THEN LET T-INT (RND* 
25>+80 

4090-IF W-9 THEN LET T-INT (RND* 
20>+70 

4100 IF W-10 THEN LET T-INT (RND 
*20 >+55 

4110 IF W-ll THEN LET T-INT (RND 
*20)+40 

4120 IF W-12 THEN LET T-INT (RND 
*20 >+25 

4130 IF W-13 THEN LET T-INT <RND 
*16 >+16 
4190 RETURN 

4310 IF W-10 THEN LET T-INT <RND 
*20 >+35 

4320 IF W-ll THEN LET T-INT (RND 
*20 >+ 2 © 



4330 IF W-12 THEN LET T-INT (RND 
* 20>+15 

4340 IF W-13 THEN LET T-INT (RND 
*16 >+10 
4350 RETURN 

4510 IF E-l THEN LET T-l 
4520 IF E-2 THEN LET T-2 
4530 IF E-3 THEN LET T-INT (RND* 
3 >+2 

4535 IF E-4 THEN LET T-INT (RND* 
3 >+3 

4540 IF E-5 OR E-6 THEN LET T-IN 
T (RND*5 >+4 

4545 IF E-7 OR E-8 THEN LET T-IN 
T (RND*5 >+5 

4550 IF E-9 OR E-10 THEN LET T-I 
NT (RND*6 >+7 

4560 IF E-l1 OR E-12 OR E-13 THE 
N LET T-INT (RND*7>+8 
4570 IF E-l4 OR E-l5 THEN LET T- 
1NT (RND*7 >+11 

4580 IF E-l6 OR E-l7 THEN LET T- 
INT (RND*8 >+12 
4600 GOTO 500 

5800 PRINT AT 0,12;"G 0 L F M 
5010 PRINT ,,"THIS IS PLRYED ON 
R COURSE WHICH",,"HRS THE USUAL 
HAZARDS• BUNKERSROUGH, TRE 
ES RND WATER." 

5020 PPINT , ," THE CLUBS ARE 
NUMBERED ONE",,," TO THIRTEEN. 

THEY REPRESENT",,," WOODS ONE 
TO FOUR AND IRONS",,," THREE TO 
NINE WITH WEDGE AND",,," SAND 
WEDGE. " 

5030 PPINT ,,"THE FOLLOWING LIST 
GIVES AVERAGE",,"DISTANCE WITH 
THE CLUBS." 

5040 FOR U-l TO 22 
5050 FOR Y-l TO 10 
5860 NEXT Y 
5070 SCROLL 
5080 NEXT U 

5100 PPINT AT 0,Oj"CLUB A 

VERAGE DISTANCE" 

5110 PPINT " 1","215 YDS."," 2 

","200 YDS."," 3","178 YDS."," 

4", "162 YDS." 

5120 PRINT " 5","145 YDS."," 6 

"."130 YDS."," 7","112 YDS."," 

8"," 92 YDS."," 9"," 80 YDS." 

5130 PRINT " 10"," 65 YDS."," 11 
"," 50 YDS."." 12"," 35 YDS."," 
13"," 23 YDS." 

5140 PRINT , ,, , "YOU WILL NOT HIT 
AS FAR FROM",,," SAND OR W 

ATEP." 

5150 PRINT ANY KEY TO ST 

5160 PAUSE 4E4 
5170 GOTO 1 
8999 STOP 

900© SAVE "GOLF 81" 

9999 GOTO 5000 


yteSkilS!* 
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For ZX81 with 16K RAM 
For 48K SPECTRUM. 


ARh'KM >!- 


lUttrvitns 


For ZX81 with 16K RAM 
For 48K SPECTRUM . 


iivi) HORROR ADVENTURE GAME! 

For the 16K ZX81 or with colour and sound for the 48K 
SPECTRUM, a superb 3D graphics adventure game! Enter 
Dracula's tomb at 30 minutes to sunset wander through the 
tomb's pre-mapped 300 vaults in search of the fabled Vampire's 
Treasure . . . pick up valuable silver stakes and use them to defend 
yourself against the lurking horrors . . . ghouls, zombies, pits of 
primaeval slime . See them all on the computer's plan of the tomb . 
. . when it will let you! Take a chance on a Mystery Vault ... if you 
dare! And all the time the minutes are ticking by to sunset . . . when 
Dracula rises from his coffin and comes after you! Each of the 
infinite levels of the tomb has its own 300 vaults . . . go as deep as 
you like, the Prince of Darkness will seek you out in his blood-iust! 
WARNING: people of an exceptionally nervous disposition 
should play this game only during the hours of daylightl Special 
facility lets you save a game in progress onto tape so you can 
continue it whenever you choose. 


Price includes ready-to-load cassette with library case and inlay, full 
instructions, postage and packing. Order todayl Money refunded if 
not delighted! 

Send cash, P.O. or cheque to: 

FELIX SOFTWARE (DEPT. SP4) 

19 Leighton Avenue, Pinner, HA5 3BW. 


THE WIZARD’S WARRIORS: A fast moving Spectrum 

game that matches developments in your £4.95 

skill as a player by becoming increasingly 

more devious. By offering to you the full 

range of options you can choose how to control 

your warrior throught the maze. A full 

implementation of this program enables such 

features as a continuous series of sound 

effects, arcade quality graphics, double-point 

scoring, and-for the very artful-bonus lives 

FORTH: A full implementation. Ideal for Spectri 

writing fast moving arcade type games. £14. 

Allows the full colour and sound facilities of 

the Spectrum to be used. Future Microdrive 

enhancements will be made available. 

ADVENTURE ONE: Features a save game ZX81 £5 

routine as the game can take months to 

complete. 

'A remarkably good version . . . well 
worth the money.’ ...Sinclair User... 

MAZEMAN: A fast action m/c game that Spectri 

reproduces the spirit of the original £4. 

'..is very accurate and fast.’ ..Which Micro*... ZX81£4. 
CHESS 1.4: Ten levels of play with this m/c ZX81 £5. 
program. 

Good graphic screen display. 

’In a class of it's own.’ ...Your Computer... 

INVADERS: Very fast m/c action. Includes ZX81 £4. 
mystery ship and increasingly difficult screens. 

DEPT SP8, 7 MAES AFALLEN, BOW STREET, 

DYFED, SY24 5BA _ 

| 24hr Ansaphone 0970 828851 


Spectrum 

£14.95 


Spectrum 
£4.95 
ZX81E4.45 
ZX81 £5.95 


For SPECTRUM 48K or ZX81 16K 

You are an Allied POW in the infamous Castle Colditz, Nazi 
fortress jail for Allied prisoners-of-war! Can you escape with your 
life through the vast labyrinth of rooms to the main gate? Tackle 
brutal Gestapo and SS guards, savage guard-dogs, traps and 
pitfalls! Survive if you can the Corridor of Rats, the Tunnel of 
Poisonous Spiders, the Vault of Human Bones and many 
more! And on your way, grab all the fabulous Nazi loot you can 
carry! 

'Classic adventure games — no random alterations! 

‘Fast, powerful machine-code response to your commands! 
*"Save-game'' facility and (you'll need it!) 

Hours (weeks?) (months?) of enjoyment! 


THE TOMB OF 


DRACULA! 


Price includes ready-to-load cassette with library case and inlay, 
full instructions, postage and packing. Order todayl Money re¬ 
funded if not delighted! 


Send cash, P.O. or cheque to: 
FELIX SOFTWARE (DEPT. SP4) 

19 Leighton Avenue, Pinner, HA5 3BW 
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Shooting thiough space you are ambushed by a 
fleet of Space Zombies flying at you in formation, 
swooping and diving at you. Destroy them, if you 
can: But in destroying them, you attract more to 
the area, and the game gets progressively harder. 
■ full screen hl-res graphics * 

• t or 2 players • Joystick option • 
•full sound and colour * 

•Three playing speeds • 


COSMIC RAIDERS (16K) 


defcndim 


MINES OF SATURN and 

RETURN TO EARTH £5,S 

Mines of Saturn While piloting a routine orbit 


:cess or Visa Card holders^H 
jphone (0344) 2 7317 (9am-6p 


Please add 40p per order for post A packi 






13] Cosmic Raiders I I Space Zombies 

| I Mines of Saturn /Return to Earth | | Mad Martha 

MIKROGEN. Dept SP. 24 Agar Crescent, Bracknell, Berkshire, RG12 2BK 


MAD MARTHA £6,95 

Poor little Henry is the hen-pecked hero of this 
domestic tale. One night he can take no more. He 
steals his wages from his wife's purse, sneaks oof 
of the house being careful not to wake the 
baby or trip over the cal, end heads for the bright 
lights to have some fim. Trouble is he runs out of 
money. His only way to raise some cash is to 
gamble his tew remaining pounds on the spinning 
wheel of the roulette table. Just as Henry is get¬ 
ting Into his everwvg his wife — Mad Martha — 
has noticed his absence. Realising Henry has 
absconded with the housekeeping she sets out after 
him with an ave. Guess what part you play in 
this happy tale' 1 That's right, you're Henry. Watch 


Graphic Adventure (48K) 


HIGH SPEED MACHINE CODED 

GAMES FOR THE 
ZX SPECTRUM 

We now have a selection of new and original games. 
Because this advert has to be written well in advance, we 
cannot give more details here. Why not write to us for a full 
sheet, which will give full details of all our products. 

COMPILER 

We still market our highly successful compiler for the 
ZX Spectrum (either memory size). This will compile 99% 
of all integral, non-string Spectrum BASIC. It converts 
your slow BASIC program into a high speed version in 
machine code (up to several hundred times faster). No 
knowledge of machine code is needed. As well as handling 
normal basic, our compiler boasts a range of commands 
designed especially for writing games, these include mini 
sprite graphics (hi-res plotting of characters) and an explo¬ 
sion noise generator. All of this for £7.99 which includes an 
instruction booklet and both 16K and 48K versions. A 
recent review in Personal Computer World stated “It would 
certainly be a good investment for the Spectrum owner, 
who wants some of the benefits of machine code without 
having to learn its idiosyncrasies”. 

Part of a reply from a satisfied customer “I have just 
received your Spectrum compiler and I must congratulate 
you, it is an excellent program. 

Make PO/Cheque payable to: 

Wye Valley Software, Parton House, Kinnersley, 
Herefordshire. Overseas orders please add £1.50. 


DIBIOIEjIQIBIiSIOIQlC 
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New from ... 


u f 


THE MICRO POWER SPECTRUM p 

‘ADD-ON’1 




Q 


0 




Ma The new Spectrum Add-On gives you 
• ONE Atari/Commodore type 
" Joystick Port 
TWO Potentiometer Joystick Ports 


PROGRAMMABLE SOUNDS — music, gun 
shots, explosions etc 


and full operating 
instructions 


SPACE ZOMBIES (16K) 


£5,95 
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DEPT SP, 9 TWEED CLOSE, SWINDON, WILTS SN2 3PU 
Tel: (0793) 724317 Trade enquiries welcome 
Export Orders: Please add £1.00 per tape airmail 
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ZUCKMAN 

ZX81 (16K) 

# ALL MACHINE CODE 
(10K) 

•FOUR INDEPENDENT 
GHOSTS 

* HIGH-SCORE 'HALL 

OF FAME' 

•AUTHENTIC ARCADE 
ACTION 

•TITLE/DISPLAY 

MODE 

ONLY £4.95 INC. P&P 

FROGGY 

ZX81 (16K) 

•MOVING CARS, 

LOGS,TURTLES 
•ALLIGATORS, 

DIVING TURTLES 
•FOUR 'SCREENS' OF 
ACTION 
•ALL ARCADE 
FEATURES 

•ENTIRELY MACHINE 
CODE 

ONLY £4.95 INC. P&P 


ZX Spectrum 

* FROGGY ~16K or 48K * 


SPECTRUM VERSION OF 

ARCADE GAME WITH FULL ARCADE 

FEATURES: 


* Fabulous Hi-Res Colour Graphics 

* Authentic Sound Effects + 3 Tunes 

* 3-0 Logs, Swimming & Diving 
Turtles 

* 3 Lanes of Multi-coloured vehicles 

* On-screen Score, Hi-Score, Time-bar 

* Snake. Alligators and Baby Frog 

* 'Top 5' High-Score initials table 

* Demonstration Game routine 

Your home-sick frog must leap across a 
busy main road, then onto logs and 
turtles in the river to reach safety of 
the river-bank frog-homes. THIS 
MACHINE-CODE GAME MUST BE 
SEEN TO BE BELEIVEDII 


ONLY £5.95 INC. P & P 



A world of activity for you 
and your Sinclair 

Whether you have a ZX80, ZX81 or Spectrum — we can show you 
there’s far more to your Sinclair than you ever thought possible. 
That’s the active, lively world of Sinclair User — the first magazine 
written specially for everyone who owns or uses a Sinclair 

computer. 

Every month, there is a whole range of games, business ideas and 
bright new ways to learn. There is the Sinclair User Club, with 
special exclusive member offers. There are technical facts, 
development news and advice, plus hints from other users and 
answers to queries — in fact everything you need to be an 
interested, informed and ACTIVE Sinclair user. 
There’s just one problem — Sinclair User sells out fast! So make 
sure you don’t miss your copy: order it today from your 
newsagent — or complete the subscription 

form below and we will ^ —* —’ I 

send it to you direct, every month. ^ — "T 7^nt> e x ° 

— r'r>e c S' je - 
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If you’re a serious Sinclair user — 
why don’t you stop playing games? 



If you need a new challenge that does’nt involve saving the universe from 
destruction, beating off green monsters or Dying a spaceship — we can 
bring you down to earth with stimulating, practical projects for the ZX81 and 
Spectrum in Sinclair Projects magazine! 
In recent issues we have shown how to use your Sinclair for controlling your 
central heating . . . improving the graphics . . . build a printer interface . . . 

and many more ideas that tax your ability and ingenuity. 
Sinclair Projects is published every two months as a glossy, instruction- 
packed magazine that gives you all the encouragement you need to 
exercise your talent and take a serious look at what 
your Sinclair can do for you. 

Each issue can contain as many as FIVE step-by-step projects — 
yet it’s yours for JUST 95p. So if you want a break from 
playing games, make sure you order YOUR Sinclair 
Projects from your newsagent today — or fill in ^ 

the form below and we will send it direct ^ 

to you, six times per year. ^ -*• *° 


— “' 1 . 30-^ 


_ . 0 -. -ptoi eC c YvaS<3 e ^ 

— ?Ye ase ctv ^ atC ve 
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58 cosue 9500 

60 CLS 

61 PRINT AT 7,12;"<9* 5*97 9r> 
")AT 8,12;"<95 5*sP 98>" 

62 PRINT AT 12,12; "< 95 4 5*sP 4 98 
> M ,AT 13, 12; "<9w - 5-T96'91 V 

65 LET 3=0 
70 DIM A9<26,36 > 

100 LET A*<3'="<2*sP 32*isP V 
110 LET A*(4>="<2*sP isP 9h sP 4 
11*1 SP 5*9h SP 5*9h 1 2tsP 10*9h 3* 

l*>" 

120 LET A*<5>="< 2*sP'isP >9h-sP 4 
9h2*sP-4*9h 3*sP 4 im2*sP 4 xs 4 sP 4 
10*9h 9h isP >" 

130 LET A*<fc>"<2*sP isP 2*SP'2 
*9h• 5*sP ’ir 5*9h 4 2*sP 10*9hu»'9 
h • iw ■ xsP >" 

140 LET A*<7>="<2*sP isP 9h sp 
I s ■ 6-toh sP • 6*9h SP 10*9h 9h ’ 
xsP >" 

150 LET A*<8>-"2*sP isP'2*9lv2* 
sP 3*9h•3#sP fo*9h•3*SP■xm•3*sr>•4 
*9h is isP >" 
lfaO LET A*<iO="<2#sP isP'3*9h-s 
P•9h•sP lm-sP 9h 4 sP'6*9h•sP•5#9h 
2*sP 9h 3*sP 9h 4 sP isP >" 

170 LET A*(10>="<2*sP•isP■9h 5* 
sP 3*9h sP-9h 4 sP im 6tsP in 3*9h 
is 2*sP 3*9h• sP • lsP :•" 

ISO LET ASK11 '="< 2*sP•isP'9h•is 
•5*9h 2TsP is 2t9h is 2*9h sP lm 
sP 9h•sP-S*9h 4 sP•3*9h 4 SP 4 isP >" 
190 LET A*<12>="<2**P isP 9h sP 
9h lssp 4*9h sP 2*9H sP 2*9H’l 
t 9h•sP■9h 4 is•5*9h sP•3*9h sp 4 x s 
P >" 

L.-00 LET R*< I3>~"< 2*sP xsP 4 9h • sP 
9h sP xro sP 1 it•sP•is 3*«* 4 am 3* 
sp 9h zP ■9h‘SP 5t9h 4 it sP is 2*s 
p i*P ■" 

210 LET rt*cl4)= , '<2*sP xsP 9h sP 
9h 2*sP 4T9h SP 4*9h 3*sP 4 i s•9h 
• sP 4 5*0h • sP 3t9h • ira isP >“ 

220 LET ASK 15>="<2*sP isP 4 9h sP 
7*9h is 4*9h 4 sP • 2*9h 4 sP 9h sP • 3 
*9h SP 3*9h 4 im 4 xsP >“ 

230 LET A*<16>="<2*sP isP 9h-it 
4 2-tsP • is*4*9h 4 sP • 3*9h 4 sP is sP 2 
*9h 2*sP it im it sp is 4 3*9h£P 
xsP >" 

240 LET A*<17>="<2*sPisP 9h*P 
2*9h 4 SP•4*9h 4 sP 4 x s• i m■2*sP•9h 4 s 
P 3*9h sP 5*9h•SP 4*9h >" 

258 LET A*C18>="<2*sP 4 isP 4*9h 
sP 4*9h 4 3*sP 4 3*9h 4 x t 4 sP 4 1 m 4 2-tsP 
5*9h 4 2*sP 4 is 4 im 4 it 4 isP V 
260 LET A*<19 >="<2*sP isP 4#9h 
sP xs'3*9h 4 is 6*9h 4 sP 2*9h sP ?* 
9h SP'2T9h 4 isP >" 

270 LET A*<20>="<2*SP isP 4 5*9h 4 
x t 4 sp 2*9h sP t*9h 4 sP 4 2*9h-is 7* 
9h sP 2*9h isP >" 

280 LET A*< 21>="(2*sP isP 6*9h 
2*sP 9h 4 2TsP is iw 3»9h sP•2toh 
sP 9h im is xt 4*sP 4 2*9M isP >" 
290 LET A*< 22 >= M <2*sP lsP 4 7»9h- 
is im sP 2»9h 4 2»sP■itsP is 4 5Tsp 
• 5#9h-it'2*9h'isp>" 

30O LET A*<23>=“<2*sP isP8*9h- 
it 2l*9h isP)" 

310 LET A« 24 )«"< 2TsP 4 32Ti SP >" 
408 LET A=14 
410 LET 8=17 
420 LET b*=-'X" 

500 LET A-A+<INKEY*«"6")-<INKEY 
*='7“ > 

510 LET 8=B+< INKEY*=' , 6’ 1 >-< INKEY 
*="5" ) 

800 PRINT AT 9, 12; "05 4 sP >"; R*< 
A-1,8+1 TO B+3>; "<sP 98>" ;AT 10, 
12; “< 95 sP ; AS< A, B+1 TO B+3);"< 
SP 4 98 V; AT 11,12; "< 95 4 sP >"; A*< A-« 
1,B^1 TO B+3 >;"<sP 98 >"j AT 12,1. 

; N < 95 5*SP 90 )•' 

810 PRINT AT 10,15;B* 

900 IF fl*< A,B+2 >="Cxs >" THEN GO 
•aUB 1000 

910 IF A*< A,B+2>= H C I*. 1 ;" THEN CO 
8UB 9000 

920 IF A*< A,B+2 >=”< 9h >" OR A*< A 
,8+2 >*’< ISP >" THEN GOTO 2000 
930 IF A*<A,B+2>"< i»)" THEN GO 
SUB 110O 

940 IF A®<A,8+2)■"<it)" THEN GO 
SUB 1200 


liM- 





m 








999 GOTO 500 
1000 LET B*="< ix.v' 

1010 LET A*<A,B+2>' M ” 

1020 RETURN 
'HOC; REM *FIGHT* 

1110 PRINT AT 10,15;" 4 ";AT 10,15 
; "; 11 > AT 10,15; ; AT 10,15;” + ";A 

T 10,15;;AT 10,15;"”";AT 10,1 
5; ‘V”; AT 10,15; '**"; AT 10,15;"£"; 
AT 10,15;"<";AT 10,15;">";AT 10, 

15;.;AT 10,15;"<";AT 10,15;"? 

";AT 10,15;".AT 10,15;",»;AT 1 
0,15;" " 

1120 IF BS="<ix>" THEN GOTO 1140 

1130 GOTO 2100 

1140 LET A*<A,B+2>=" " 

1150 LET B*="X" 

1160 LET S-S+100 

1165 PRINT AT 0,8;"SCORE*";S 

1170 RETURN 


A NEW PHENOMENON is re¬ 
placing the squashed frog 
games which used to dot the 
pages of Sinclair Programs. Hapless pro¬ 
grammers are being trapped in mazes of 
great complexity, with an assortment of 
enemies and handicaps confronting 
them. The number of ways in which a 
maze can be used is growing steadily. 

Tomas Whitlock of Hull confronts 
16K ZX-81 users with a maze of which 
only a small area c*an be seen at one 
time. While scratching for the exit you 
have the chance to gain points by killing 
monsters and picking-up treasure. Full 
instructions are given once the program 
is RUN. 

1200 LET 3=5+1000 

1210 PRINT AT 0,9; '"SCORE*";3 

1220 LET AS< A,B+2 )=" " 

1230 RETURN 
2009 CLS 

2005 PRINT "YOU JUST BLEW YOURSE 
LF TO BITS ON THE ELECTRIFIED W 


2O20 GOTO 9020 
210O CLS 

2110 PRINT "YOU RAN INTO A M0N3T 
ER. YOU DID NOT HAVE A SWORD." 
2120 PRINT "YOU SCORED 4 "; 

2130 GOTO 902O 
9000 CLS 

9010 PRINT "CONGRATULATIONS. YOU 
HAVE FOUND YOUR WAY OUT WITH 
9020 PRINT S;" POINTS." 

9022 PRINT "ANOTHER GAME < YES/'NO 
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9023 INPUT 2* 

9024 IF 2*<1>»"Y" THEN RUN 

9025 IF Z*C 1>-”N" THEN GOTO 3023 
9926 GOTO 3023 

9029 GOTO 9000 

3500 PRINT " maze-moriste 


9501 PRINT 

9502 PRINT 

9510 PRINT "YOU HRVE TO FIND YOU 
R WRY OUT OFR 22X32 MAZE. WHICH 
IS STOCKED WITH TRERSURE. SWORD 
RND MONSTERS." 

9520 PRINT "YOU START OFF AS RN 
X. RND YOU GET R SWORD BY MOVIN 
G YOUR X OVER THE <is>." 

9525 PRINT 

9530 PRINT "THERE IS TREASURE] < 
it), THERE RRE MONSTER 

Si <in>< THCRE RRE SWOR 

DSi 

9535 PRINT 

9540 PRINT "POINTS" 

3550 PRINT "TREASURE 1000 PTS. 

KILLING R MONSTER 1 

00 PTS." 

3559 PRINT 

3560 PRINT .RNY KEY TO CO 
NT1NUE." 

9570 IF 3NKEY*-"" THEN GOTO 3570 
CLO 

9590 PRINT "AS YOU MOVE. THE COR 
RIDOR WILL SCROLL PRST YOU. DEP 
ENDING ON WHICH KEY YOU PRESS. 

THIS GIVES THE EFFECT THRT THE 
CORRIDOR IS MOVING PRST YOU." 
9595 PRINT 

96O0 PRINT "CONTROLS'" 

9610 PRINT "8-R1CHT." 

3620 PRINT "5-LEFT." 

9630 PRINT "6-DOWN." 

9640 PRINT "7-UP." 

9645 PRINT 

9650 PRINT "< iiO-MQNSTER. " 

966Q PRINT "<ls'*SWORD." 

9670 PRINT "<it >=TRERSURE." 

9680 PRINT " 1 =THIS WRY. 


9681 PRINT " RNY KEY TO CON 

TINUE." 

9682 IF INKEY*-"" THEN GOTO 9682 

9683 CLS 

9690 PRINT "IF YOU TOUCH THE WRL 
LS OR THE BORDER ROUND THE MRZ 
E. YOU WILL GET FRAZZLED TO R CR 
'ISP. " 

9695 PRINT .,isP>"THE BORDER." 

9697 PRINT "<9h'-THE WALLS. “ 

9698 PRINT 

9701 PRINT .."THE OBJECT OF THE 
GRME IS TO FIND THE EXIT <MRR 
KED <i*>< WITH ASMUCH TRERSURE R 
S POSSIBLE." 

9705 PRINT .."BUT BF.WRRE; DO NOT 
USE UP RLL THE SWORDS. DECRUS 

E THERE ARE MONSTERS GUARDING 

THE ESCAPE ROUTE." 

9709 PRINT 

9710 PRINT " RNY KEY TO BE 

GIN. " 

9720 IF 1NKEY*="" THEN GOTO 9720 
5720 RETURN 

Ws P 



T IM DERBY of Hedge End, 
Southampton has, by devising a 
relatively simple game, managed 
to incorporate a very good graphics 


display in this program for the IK ZX- 

81 . 

The cowboy walks quickly towards 
you. Once his guns appear in his hands 


you must shoot him by pressing any 
key, before he shoots you. Good reac¬ 
tions are needed; your reviewer man¬ 
aged to shoot the cowboy only once. 
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1 POkti 236*50. O' RESTORE 

3 DEF FN T< .w< 65526*PLCK 236? 
4+25CTPLLK 23673+PEEK 23672V50 

2 OFF FN L< A, 6 >-< A+O+ABS <A-I3 

4 OFF FN R<X)*<< INT <X*10>>/1 

0> 

10 LET K$- " 1234567O90OWERTYUIO 
PASDFCHJKL 2XCVENM " 

20 LET Y+8 DATA -3.-1.0,-1 
50 BORDER 0 PAPER 0- INK 6 
100 CLS ' TOR R-0 TO 3 LET Y-Y 
+'i- READ X 

110 FOR K=1 TO 10 LET X«X+3 
120 PRINT INK. 0j PAPER 5;AT Y.X 
;K3KR*10+K>; " ";AT Y+l,X■ " " 

130 NEXT K< NEXT R 
140 PRINT PAPER 5;AT 20,1;" ";A 
T 21,1;" ";AT 20,21;" ";AT 21,31 


.70 PRINT .1""-instructions" 

.2""-Trainin9 M ' , "*‘‘3""-Tj.med t 

e-Jt"'.‘4""-Quit Program" 

00 GO TO 2O0+eO0*<INKEY*®"1“)+ 
1 OO0*< INKEY*=""2 H >+2800*< INKEY*-" 
3“ '+9?99*< lNKEY*-"4" 

1OO0 GO SUB 3000 PRINT INVERSE 
1," 1 INSTRUCTIONS " 

1010 PRINT '" Place the four fx 
nOers of eachhand on the f la-shin 
9 keys." 

1020 PRINT These are the 'ho 
me keys' and your fingers always 
return to them when they are 
not tyPin9.“ 

1025 LET R-1500 
1030 GO SOD 150O GO OUe 9000 
1040 PRINT " Each finger has a 
set of keys which only that fins 
er touches." 

1050 PRINT All except the in 

dev fingers control the vertica 

I row of fourkeys that the fin9e 
r's home key js in." 

1060 PRINT '"E.9. only the rin9 
fingers should touch the fl 

ashing keys." 

1070 GO SUB 1500 GO SUB 3000 
1080 PRINT " The only exePtion 

to this is the index fingers wh 
ich must. both control ei9ht k 
eys." 

1090 PRINT '" The right hand in 
dex fin9er, for example, uses a 

II eight of the flashing keys." 
1100 PRINT '"YOU NON HAVE THE RB 
SOLUTE 8ASIC50F TOUCH-TYPING." 
1110 GO SUB^1500 _G0 T0_150 
1500 DATA 17.3,17,6,17,9,17,12,1 
7,21,17,24,17,27,17,30 

1310 DATA 11,4,11,23.14.3.14,26, 

17,6,17,27,20,3,20,36 

1520 DATA 11,16,11.19.14,17.14,2 

O,17,IB,17,21.20,17,20,20 

1530 LET I“0 OVER 1 FLASH 1 I 

NK 1 PAPER 5 FOR N*1 TO 2' RES 

TORE R= FOR M»1 TO 8 

1340 READ Y.X PRINT AT Y.X." " 

;AT Y+l,X;" " 

1550 NEXT M IF 1*0 THEN INPUT F 
LASH 1;" Push ""ENTER"" to conti 
nue LINE a* LET 1=1 
1560 FLASH 0 INK 0 NEXT N OVE 
P O INK 6 PAPER 0 LET R-R+10 
1570 RETURN 

2000 GO SUB 9000 PRINT INVCRSE 
l;'* 2 TRAINING " 

2010 PRINT You are required 
to type the characters that wil 
l appear on the toP half of the 
screen." 

2O20 PRINT '" Do not took at th 
e keys as youPush them although 
you can look at the screen below 
until you get a feel for thei 
r locations." 

2030 INPUT FLASH 1;" Keyboard vi 
ssihle? <YxN> LINE A* IF A *< 
>"Y" AMD A#< >"N" THEN GO TO 2030 
2O40 CO SUB 9000 
2050 IF AS="N" THEN CLS 
2060 LET C**© : LET IC-0 










2090 PRINT "« NUMBER CORRECT 0 
""" HUMBER INCORRECT 0" 

3095 PRINT "" TYPE '"'STOP"" TO 
EXIT" 

2100 LET B*-"K*<RND*37+1 >■ IF B*+ 

" " THEN GO TO 2100 

2110 PRINT FLASH I;AT 1,7;" ";8* 

2120 LET A*”INKr-Y* IF A*' 5 ’"" THE 
N CO TO 2120 

2125 IF CODE A*=226 THEN RUN 
2130 IF A*-P* THEN BORDER 6' BEE 
P .1,10 BEEP .2,20- BORDER O' L 
ET r.*t+l PRINT AT 4,17;C 
2140 IF A*< >B® THEN BORDER 2- BF 
EP .1,0 BEEP .2,-10' BORDER 0 
LET IC-IC+1 PRINT AT 6,19;IC G 
0 TO 2120 
2150 GO TO 3100 

3000 GO CUB 9O00 PRINT INVERSE 
1," 3 TIMED TEST " 

2010 PRINT Random words will 
appear and you must type and “ 
"ENTER"" them as fast as Possib 
tr.” 

3O20 PRINT '" After ten words, 
your typing speed will be ealeu 
lated." 

3030 PRINT '"NO CHEATING & NO KE 
YBOARD EITHER" 

3040 INPUT FLASH 1," Push ""ENTE 
R***’ to begin "; LINE A*’ CLS 


F OR THOSE who have never had 
typing lessons and consequently 
feel that typing programs on the 
Spectrum is more difficult than it 
should be, T Collins of Enfield, Midd¬ 
lesex has written Touch Type, a pro¬ 
gram designed to be a crash course in 
typing. 

There are three sections between 
which you can choose—a short series of 
instructions, an endless series of letters 
for practice, and a typing test which 
indicates your speed in words per min¬ 
ute (16K Spectrum). 

3050 DRAW 0,175 DRAW 255,Q DRA 

W 0.-175- DRAW -255,0 

306O PLOT 0,144 DRAW 255,0 

3070 PLOT 127,175’ DRAW 0,-175 
30eQ PRINT AT 1,3;"WORD TO BE";A 
T 2,4;"ENTERED'";AT 1,22;"WORD"; 

AT 2,20;"ENTERED" 

3090 LET W*»" DEARWALLFACEDRAW 

LI5TNAMEFALLFAMEMAILTAPEHIGHFROM 
POCTMODEKEYCBOTHLINEFILMNOSEPART 

3095 POKE 23674,0' POKE 23673,0- 
POKE 23672,0 

3100 FOR N=1 TO 10- LET W-INT <R 
NDT20+1-' LET B*-W*<W*4 TO WY4+3 
PRINT AT N+4 • ! ;N;TAB 6;8* 

3110 INPUT LINE A* PRINT AT N+4 

,22;A*;" 

3120 IF A« >B* THEN CO TO 3110 
3130 NEXT N 

3140 LET T-FN LCFN T< >,FN T<)> 

3150 BEEP 1,0' CLS 

3169 PRINT "TIME ",FN R<T>;“ SEC 

OND'i " 

3165 PRINT "'"SPEED ’",rN R<50xT 
>;" CHRxSEC" " , FN R< 50-'T*12 >; " W 
ORDS/'MIN" 

3l70 INPUT FLASH 1;" Push ""ENTE 
R" H to continue "; LINE a* RON 
9000 PPINT AT 0,0; FOR n-1 TO 1 
0' PRINT INK 0;K*< TO 32>' NEXT 
n' PRINT AT 0,0, RETURN 
9999 BORDER 7- INK 0' PAPER 7- C 
LS ' STOP 
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A GAME for one to five players. 
A washing line is displayed on 
the screen and you must choose 
which items of clothing to hang on it 
until it breaks. Try not to be the person 
who breaks the line. 

Heavier clothes carry high scores; 
socks score very low. A random element 
is introduced by the birds of unknown 
weight which land on the washing line 
from time to time. 

Washing Line was written for the 
16K Spectrum by Michael Leach of 
Blackburn, Lancashire. 



1 PRINT "STOP THE TOPE” LET 
hs-0‘ GO SUB 1000 DIM MK2>' LE 
T b«l)-"P"' LET b*<2 >«"H' 

2 DIM t*< 2 ) ' DIM r*<2) DIM P 
*<2.2> DIM Jt<2>2>- DIM s*< 1 V 
DIM u*< 3,2) 

3 LET LET t*<2H"s 

" - LET r*< 1 H“t" ' LET r*< 2 H"u ,r ~ 

LET u*<2>-"lm"' LET u*<3>*'W’ 
LET p*< 1 )= "ab" - LET P«< 2 )- w CcP‘ = 
LET .;«<1 ) g "f9" LET j*<2>-"hi" 
LET s« 1 -"J" LET 

4 INPUT "Do aou want instruct 
ions?<a/n)";a* IF a*""a" THEN C 
0 SUB 2000 

'5 BORDER 5’ PAPER ?■ INK 0 C 
LS 

6 INPUT "1 TO 5 PLAYERS";P 

7 IF P>5 THEN GO TO 50 
0 DIM n*<P,4) 

9 FOR f«l TO P INPUT "Plwer 
name*'4 letters 

NEXT f 

10 PRINT AT 0.5;"HANG OUT TH 
E WASHING'" 

15 PRINT AT 1,13>"HI-3£X'RE";h* 
20 PRINT AT 21,0; INK 4;"<02*i 
98 >" 

30 FOR 7=10 TO 20 PRINT AT z, 
0; INK 3;"<i95)";AT z.31; INK 3; 
"< *35 >" ' NEXT z 

40 PLOT 0,96- DRAW 255.0 
70 DIM s<f>’ LET s< 1 >'0 ■ LET s 
<2>-0 

00 LET PP-1' LET x=2' LET v = l 
90 LET Pu“500 LET jw= 403' LET 
vw=100 1 LET uw=75■ LET sw-50 

95 LET 9t«2500+INT <RND*1000H 

100 

96 LET tw-0 
100 FOR f=l TO P 

110 PRINT INK 0;AT 2,0;n*<f);"' 


s 90 " 

120 PRINT INK 0;AT 3.0;"Which i 
tem? P-Pants j=jumper uP-u.Pa 
nts v=vest s-socks sc=scar 

f sk-skirt" INPUT a* 

130 IF a*«"P" THEN GO TO 200 

140 IF aS»".i" THEN GO TO 250 

130 IF a*-"v" THEN GO TO 300 

160 IF »*—"UP" THEN GO TO 350 


170 IF a*-"s“ THEN GO TO 400 

171 IF a*-"sc" THEN GO TO 450 

172 IF a*="sk" THEN GO TO 500 
175 GO TO 120 

180 IF INT < RNDY10 P-5 THEN GO T 
0 700 

185 IF PPH3! THLN GO TO 850 
190 NEXT *' 

195 GO TO 1O0 

200 LET tw=tw+300+INT <RNDT20> 

201 OVER 1 

210 IF tw>=9t THEN GO TO 800 

220 LET s<f )»»<f H25+INT < RND* i 

1 > 

230 INK INT < RNDT7 1 PRINT AT 1 
0,PP;P*< 1 >;AT 11,PP;P*<2> 

235 LET PP-PP+2 

236 OVER 0 

237 BEEP .1,25 
240 GO TO 180 

250 LET tw-tW+400+INT <RNDtl5> 

251 OVER 1 

260 IF tu>=9t THEN CO TO 808 
270 LET s< f )=s< f>+20+INT <RND*1 
1) 

280 INK INT <RND*7)> PRINT AT 1 
O.PP; J*< 1 >;AT ll,PP;j*<2) 

285 LET PP~PP+2 

286 OVER 0 

287 BEEP .1,20 
290 GO TO 180 

300 LET tw-tw+100+INT <RND*15> 

301 OVER 1 

310 IF tw>»9t THEN GO TO 800 
320 LET s<f >=a<t'H15+INT (RNDt 1 
1 ) 

330 INK INT (. RND*7 > : PRINT AT 1 
9,PP;u*<2);AT ll,PP;u*<3> 

335 LET PP-PP+2 

336 OVER 0 

337 BEEP .1,15 
340 GO TO 180 

350 LET tw-tW-75+INT <PND*15) 

351 OVER l 

360 IF tw>—9t THEN GO TO 800 
370 LET s< f>-s< f H10+1NT < RNDT1 

> 

380 INK INT <RND*?V PRINT AT 1 
0,PP;u*( 1 ) 

385 LET PP-PP+l 

386 BEEP .1.10 OVER 0 
390 GO TO 180 


400 LET tw-tw+50+INT <RND*15> 

401 OVER 1 

410 IF tw>=9t THEN GO TO 000 
420 LET s<f Hs<f H5+INT <RND*1! 

> 

43A INK INT <RND*7> PRINT AT 1 
0,PP;s*(1> 

435 LET PP-PP+1 

436 EEEP .1,5 OVER O 
440 GO TO 180 

459 LET tw-tu+250+INT <RND*15> 
451 OVER 1 

460 IF fu'-st THEN GO TO 800 
470 LET s<f)-s<f HI 7+INT > RND* 1 

1 > 

480 INK INT < RNDt? >’ PRINT AT 1 
0, PP; t9< 1 'm AT ! 1, PP ; t*< 2 > 

485 LET PP-PP+1 

486 BEEP .1,17- OVER 0 
490 GO TO 180 

500 LET tw-tw+450+lNT <RND*25> 

501 OVER 1 

510 IF tw>—9t THEN CO TO 800 


LET s<f Hs<f H22+INT <RND*1 

1 ) 

530 INK INT <RND*? V PRINT AT 1 
0,PP;r*< 1 >; AT ll,PP:r*<2> 

535 LET PP-PP+1 

536 BEEP .1,22- OVER 0 
540 GO TO 180 

700 INK 0 LET x-2- LET v=21 L 
ET tv—INT <RND*31> 

705 LET tx-< 31 -tv V5 
710 FOR 9=31 TO tv STEP -1 
720 PRINT AT PAUSE 5' 

PRINT AT x,9;" " 

730 NEXT 9 

740 FOR 9=2 TO 8 PPINT AT 9,tv 
,»4»- PAUSE 5 PRINT AT 9,tv;" " 
■ NEXT 9 

750 PRINT AT 9,tv;"P" 

760 LET tw-tw+50+INT <RND*101> 
765 IF tw N =9t THEN GO TO 800 
770 LET s<f )-s<f HINT (. RND*25 > 4 

770>LET s<f >-s<f HINT <RND*25H 
25 

780 GO TO 185 

793 PRINT AT 8,0:"BIRD"' GO TO 
185 

799 STOP 
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900 OVER 0 PRINT PT 10,PP+l;"e 
";PT 9.PP;"SNAP"• PEEP ).-90 PR 
INT "PIaucr ";f;" loses" 

001 LET s< f >=s< f '»-25 
802 PAUSE ISO 

310 INK 0 FOR f»l TO p PRINT 
AT 9*f»0; "Plau*r ";f;" " ; r»*<’ f V " 
"; , "5CC.re")S<f'• NEXT f 
81-5 FOR f*-l TO P IF *<f»hs TH 
EN LET hs-s<0 
816 NEXT f 

820 INPUT "Another G*me?< *xn V ; 

a* 

830 IF a*="u" THEN CO TO 870 
840 IF a*-"n" THEN STOP 
345 CO TO 823 


350 PRINT "Lin* Full, fill Plave 
rs lose" 

860 PRINT PT 9/23;"SNAP";PT 10/ 
30;"e" CO TO 010 
370 INPUT "Same number of Pisue 
rs?(«/n)"; a* 

880 IF ***“*“ THEN CO TO 800 
890 IF a*""n" THEN CO TO 4 
895 CO TO 870 

9O0 INPUT "Instructions? <«^n>" 

; *S 

910 IF a*'"v" THEN GO SUB 2000- 
CLS - GO TO 10 

930 IF a*="n" THEN CLS CO TO 
13 

940 GO TO 930 
1000 FOR u* - 144 TO 164 
1010 FOR f-0 TO 7' REPO j POKE 
USR CHR* u+f/a ! NEXT f' NEXT u 
1020 RETURN 


1058 DPTR 15, 15, i5.15.t4,M.’4,1 

4 

1060 DPTP 240,240,240,240.112/11 

2,112,112 

1O70 OPTP 14,14,14,14,14,14,14,1 

4 

1080 OPTP 112,112,112,112.112,11 

2,112,112 

1090 OPTP 145,82,0,e,02,0,74,137 
1100 OPTP 3,7,63,63,55,55,55,55 
1110 OPTP 192,224,252.252,236,23 
6,236,236 

1120 OPTP 55,55,7,7,7,0,0,0 
1130 OPTP 236,236,224.: 224,224.0. 
0,0 

1140 OPTP 20,23,20,20,20,20,119, 
119 

1150 OPTP 255,255,255,126.60,24. 

0,0 

1160 DPTP 4,4,6,7,7,7,7,7 

1170 OPTP 32,32,96,224,224,224,2 

24,224 

1130 DPTP 7,7,7,7,7,0,3,0 
1190 OPTP 224,224,224,224,224,0, 
0,0 

1203 OPTP 4,4,7,252.124,60,16,25 

5 

1210 OPTP 3,0,66,165,24,24,0,0 
1220 OPTP 124,124,62,31,62,124,2 
48,124 

1230 OPTP 62,31,62,124,248.168,8 
4,42 

1240 OPTP 126,126,126,126,126,12 
6,126,126 

1250 DPTP 255,255,170,0,0,0,0,0 
2000 CLS - PRINT PT 0,5>"HPNG 0 
UT THE WASHING!" 


2001 PRINT “You Hive to bang as 
msnu items'" "of clothing out on 
the Tine '""as Possible without 
the line '""breaking. Each item 
has an '" "approximate wei9ht and 

the '""heavier the item the hi9 
her '""the score.The score is al 
so '" "approximate The 9ame ends 
when"'"the line snaPs ." 

2010 PRINT "PIso birds can land 
on the line"'"which makes it hea 
vier." 

2020 PPINT PT 11,0;"SCORING -",T 
PB 16;"POINTS";TPB 25;"WEIGHT" 
2030 PRINT PT 12,0;P*<1);" Pant 
s";TPB 16;25;TPB 25;500;"9";TPB 
0;P*< 2 > 

2035 PRINT 'r*<1>;" Skirt";TPG 1 
6>22;TPB 25;450;"9";TPB 0;r*<2> 
2040 PRINT JumPer";TPB 

16;29;TPB 25;4O0;"9“;TR8 0;j*<2 


2044 PRINT "Press anu kev" PPU3 
E 0 POKE 23692,255 

2045 PRINT 't*<1>;" Scarf";TPB 
16;17;TPB 25;250;"9";TPB 0;t*<2) 
2050 PRINT 'u*<2>;" Vest";TPB 1 
6;15;TPB 25;100;"9";TPB 0;u*<3> 
2060 PRINT 'uSK 1>;" UnderPants"; 
TPB 16; 10; TPB 25 75; "9" 

2070 PRINT 's*<1>;" Socks";TPB 
16;5;TPB 25;50;"9" 

2075 PRINT 'b®<1>;" Bird";TPB 1 
6;"?";TPB 25;"?9" 

2080 PRINT '“Press anv keu"= PRIJ 
SE 0’ RETURN 
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A LONG THE TOP of the screen 
is a row of stars. You must clear 
away the stars in as few attempts 
as possible. Do so by means of the stars 
at the bottom. By setting them in mo¬ 
tion at different times you can make 
them collide under a specific star, thus 
sending up a bolt of energy which will 
destroy that star. Hit Star is for the 
16K Spectrum and was written by John 
Lifford of north-west London. 



10 LET hsc-58 1 LET b*«"SPectru 
m" 

20 GO SUB 2000 

60 DATA .13/7,.13,7,.15,?,.9,0 
,.9,7,.13,3,.15,4..13,2,.9,12,.4 

5.7.. 13.3..13.4..13.2..9.12..43, 

7.. 13.5..13.4..13.3.1.2 

70 RESTOPE 60' FOR n-1 TO 19' 
RERO c,6 1 BEEP c,d' NEXT n 
110 CLS 

120 PRINT RT 0,0;"* ****** 
* ********" 

160 PRINT RT 21,ay; INK l;"*" 

170 PRINT RT 21,by; INK 3;"*" 
210 IF a-0 THEN GO SUB 300 

220 IF b-0 THEN GO SUB 350 

230 IF a-1 THEN GO SUB 400 

240 IF b-1 THEN GO SUB 300 

290 GO TO 200 

310 IF INKEY*-"*" OR INKEY*-"Z" 
THEN LET a-1 
340 RETURN 

360 IF INKEY*-"m" OR INKEY*-"M" 
THEN LET b-1 
390 RETURN 

410 IF ayOby THEN PRINT RT 21, 
ay, INK 1>" *"' LET ay-ay+1 
420 IF ay-by THEN GO TO 600 
490 RETURN 

310 IF byOay THEN LET by-by-1 ■ 
PRINT RT 21,by, INK 3,"* " 

320 IF by-ay THEN GO TO 600 
390 RETURN 
610 LET s-ay 

620 IF SCREEN* <0,»>-"*" THEN L 
ET beeP-1 

630 FOR n-20 TO 0 STEP -1 

640 PRINT RT n,s; INK 4,"a"- PR 

INT RT n+1, s; " " - 

650 BEEP . 02,50-C 2*n)_ 


660 NEXT n 

670 IF beeP-1 THEN PRINT RT 0,s 
, INK 2,"b:■ BEEP .03,24 
680 PRINT RT 0,s;" " 

690 LET sc-sc+1 LET a-0> LET b 
-0- LET beeP-0 LET ay-0' LET by 
-31 

710 FOR n-0 TO 31 
720 IF SCREEN* <0,n>-"*" THEN G 
0 TO 130 
730 NEXT n 
740 CLS 

750 PRINT RT 8,1; INK 2; PAPER 
7; BRIGHT 1; INVERSE 1;"WELL DON 
EM You took ";sc;" 9oes" 

760 PRINT RT 12,8; INK 4,"Best 
score - ";hsc 

770 PRINT RT 13,8; INK 4;"By "; 
INK 3;b$ 

700 IF ac<hsc THEN GO TO 808 
790 GO TO 850 

010 INPUT INK 0, PAPER 7; FLASH 
1;"Name Please";b* 

820 IF LEN b*>15 THEN GO TO 810 
830 LET hsc-sc 

840 PRINT RT 12,21; INK 4;hsc;" 
";RT 13,11; INK 3;b*;" 

860 PRINT RT 20,3; INK 1; PAPER 
6; FLASH l;"Do you want another 
9ame?" 

870 INPUT a* 

880 IF a»-"n" OR a*="N" THEN ST 
OP 

890 PRINT RT 20,0;" 

900 GO SUB 1000 
910 GO TO 50 

1010 LET sc—0 : LET beeP-0 

1820 LET aa°0' LET ba-31_ 


1030 LET a-0' LET b-0 
1990 RETURN 

2010 PRINT RT 0,0; INK 0; PAPER 
5;" HIT-STRR 

2030 PRINT '""You have to clear 
the stars off the toP of th 

e screen." 

2040 PRINT '"In order to do this 
you have to make your two stars 
(the ones onthe bottom? collide 
and send uP a bolt of en 

er9y." 

2030 PRINT " INK 2;"Use=- M 
2060 PRINT ' INK 1;" z - t 

o start left one m - t 

o start ri9ht one" 

2940 GO SUB 3000 
2930 GO SUB 1000 

2960 PRINT AT 21,4; INK 1; PAPER 
6; FLASH 1;"Press any key to st 
art" 

2970 PAUSE 0 

2980 PRINT RT 21.0;" 

2990 RETURN 

3010 DRTR "a",0,24,24,24,24,24,2 
4.0,"b".153,66,36,129,129,36,66, 
153 

3020 RESTORE 3010 
3030 FOR f-1 TO 2 
3040 READ e* 

3050 FOR n-0 TO 7 

3060 RERD 9 

3070 POKE USR e*+n,9 

3080 NEXT n 

3090 NEXT f 

3990 RETURN 
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Y OUR JOB is to collect as many of steer, the easily-reached higher satellite Space Mission is a game for the 
the satellites above you as poss- and the more elusive lower satellite. 16K ZK-81 written by G B Duncan of 

ible. On each journey there are You score extra points for landing cor- Hartfield, East Sussex, 

two satellites towards which you to rectly on your launch pad. 


1 REM "SPACE MISSON" 

2 LET H-0 

3 LET 1-0 

4 LET M-l 
3 LET S-0 

6 IF 1-0 THEN LET R*-"ZX 81" 

10 LET fi-19 

11 LET B-14 

18 IF 1-0 THEN GOTO 20 

19 GOTO 24 

20 FOR F-l TO 20 

21 PRINT FIT 10/ 10; "SPRCE MISSO 

N M 

22 PRINT RT 10/10;" 

23 NEXT F 

27 FOR P-1 TO 13 
20 PRINT RT P/0;" 

29 NEXT P 

30 IF 1-1 THEN GOTO 100 

34 PRINT RT 10/5;"DO YOU WANT" 
INSTRUCTIONS (Y^N) T" 

35 IF INKEY*-”Y" THEN GOTO 50 
37 IF INKEY0-"N" THEN GOTO 99 
40 IF INKEY*<>"N" THEN GOTO 33 

50 PRINT RT 10/3;"YOUR TASK 18 
TO ";/;"COLLECT THE SATELLITES* 

*>" 

51 PRINT 

52 FOR F-l TO 10 

53 NEXT F 

35 PRINT "200 - TOP SATELLITE" 
56 PRINT "300 - MIDDLE SATELLI 


TE" 

57 PRINT "50 - LANDING CORRECT 

LY" 

58 PRINT 

60 PRINT •• ANY KEY TO CONTIN 
UE" 

63 IF INKEY*-"" THEN GOTO 63 
67 CLS 

70 PRINT RT 10,3;.. TO LRU 

NCH" 

71 PRINT 

75 PRINT .3"" RND ""8"" TO S 

TEER" 

76 PRINT 

78 PRINT "YOU HAVE 5 MISSIONS" 

80 PRINT 

81 PRINT 

82 PRINT " ANY KEY TO CONTIN 

UE" 

83 IF INKEY*-"" THEN GOTO 05 
86 CLS 

07 PRINT RT 10,6;"Good luck" 

08 FOR F-I TO 20 
89 NEXT F 
99 CLS 

100 PRINT RT 21/0;"SCORE-",S;" 

";TRB 21;"MISSION-"jM;AT 0,0 
;"HI-SCORE-";H;" BY ";R* 

107 IF M>-6 THEN GOTO 800 
110 PRINT RT 20/0;"<13*9d'96'99 
< isP : 9w ' 96 ■ 14*9dV 
115 PRINT RT fl-1,B+l;"<" 

120 PRINT RT R,B;"<93 1 i* 1 94)" 
130 G0SU8 900 


200 IF INKEY*-"P" THEN GOTO 210 
205 GOTO 200 

210 PRINT RT 10,10;"LIFT-OFF" 
220 PRINT RT 19,12;"<2*9h 93 ■i* 
<9412*9h >" 

222 PRINT RT fi.B;" 

224 LET R-R—1 

230 PRINT RT A,B;"<93■i* 94>" 

240 FOR N=0 TO 13 

241 IF N-l THEN PRINT RT 10,10i 

242 PRINT RT fl.B-i;" " 

245 LET R-R-1 

246 IF B=1 THEN LET 8=2 

2SO PRINT RT fi.R: "<93 i* 94>" 
2'*'~ IF INKEY*-"5" THEN LET 8-8- 

1 

268 IF INKrY*="0" THEN LET B=B+ 

1 

261 IF N-3 THEN-PRINT RT 19,12; 

262 IF R-2 RND 8+l=X THEN LET S 
-S+200 

264 IF fl=2 RND B+l-X THEN GOTO 

300 

265 NEXT N 

266 PRINT RT 21,6;S 

267 GOSUB 300 
270 GOTO 320 
310 GOSUB 500 

315 PRINT RT 21,6;S 

320 FOR L-17 TO 0 STEP -1 

321 IF B-l THEN LET 8-2 

322 IF 8-29 THEN LET 8-28 
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323 PRINT AT A,B;"<93'i* 94>" 
325 PRINT AT A,B-1," 

330 IF INKEY*-"5" THEN LET B=B- 

1 

335 IF INKEY*-"8" THEN LET B-B+ 

1 

345 LET A=A+t 

350 IF A=C AND B+l-V THEN LET S 
=3+300 
360 NEXT L 
362 PRINT AT 21.6;S 
36? LFT M=M+1 

366 IF A-20 AND B-14 THEN LET S 
=S+50 

367 IF A-20 AND 8014 THEN GOSU 
A 1000 

368 LET I-1 
370 GOTO 7 

500 LET r=INT <PND*2>+8 
■=.05 LET V-INT <RND*5>+12 
530 PRINT AT C.V."*" 

540 RETURN 

000 IF S>H THEN LET H-S 
002 FOP K-0 TO 20 

803 PRINT AT 10.10."MISSIONS OV 
TP" 

804 rPINT AT 10.10;*' 

00=: NFXT Y 

006 IF H-S THEN GOSUB 2800 
008 r,O f 'l 10 30O0 

860 PRINT AT 12,8;"ANY KFY TO R 
UN " 

810 IF INKEY*-"" THEN GOTO 810 
820 GOTO 4 

•->00 LET X-INT <PNDT201+5 

905 LET 2-2 

330 PRINT AT Z,X;"*" 

*340 RETURN 
950 PUN 

1000 FOR J=0 TO 15 

1005 PRINT AT A, B;3*i? >" 

1010 PRINT AT A, 6;" " 

1020 NEXT J 
1030 RETURN 



2000 CLS 

2010 PRINT AT 10.6;"YOU HAVE SET 
A NEW " 

2012 PRINT AT 12,11;"hiahUscor#" 
2014 PRINT AT 14.6;"PLEASE ENTER 
YOUR " 

2016 PRINT AT 16,8; "NAME <MA.X 10 
LETTERS >" 

2018 INPUT A* 

2019 FOR Z-l TO 30 

2020 NEXT Z 

2021 CLS 

2022 RETURN 


3000 CLS 

3810 IF S<1O00 THEN PRINT AT 10, 
6;"NOT BAD FOR AN AMATEUR" 

3015 IF SC1000 THEN RETURN 
3020 IF S<2000 THEN PRINT AT 10, 
6;"WELL DONE THATS GOOD" 

3025 IF S<2000 THEN RETURN 
3030 IF S<3000 THEN PRINT AT 10. 
6;"EXCELLENT PLAY " 

3035 IF SO000 THEN RETURN 
3040 IF S<"4000 THEN PRINT AT 10, 
6."REALLY PROFESSIONAL " 

3045 RETUPN 



BB 


T HE COMPUTER prints a ship 
at random on the screen. Type-in 
the number of the row and then 
of the column in which you think the 
ship is situated. You score one point for 
hitting the ship and five points for 
hitting it in the middle. 


1 LET S-0 

2 LET SS-0 

3 LET 3D-0 

9 FOR T-l TO 10 
10 LET H*-"<9»>" 

30 LET A-INT <RND*20>+1 
40 LET B-INT <RND*26>+1 
50 PRINT AT fl,B;"(9r-3*isP 9*) 

60 PRINT AT A-i,Bj"<2*SP-9U'2* 
*P >“ 

65 PAUSE 50 
70 INPUT D 
80 INPUT F 

100 IF D-A AND F-B+2 THEN LET H 

-at)" 

101 IF D-A AND F-B+2 THEN LET S 


If you hit the top deck only you score 
nothing. At the end of the game the 
number of ships sunk, ships destroyed, 
and your score are all displayed. 

Periscope can be played on the IK 
or 16K ZX-81 and was written by Mark 
Snowshall of Sherwood, Nottingham. 


s-ss+i 

110 IF D-A AND F-B+2 THEN LET S 
-S+5 

120 IF D-A AND F-B OR F-B+l OR 
F-B+3 OR F-B+4 THEN LET S-S+l 

120-IF D-A AND F-B OR F-B+l OR 
F-B+3 OR F-B+4 THEN LET S-S+l 

121 IF D-A AND F-B OR F-B+l OR 
F-B+3 OR F-B+4 THEN LET SD-SD+1 

131 PRINT AT D,F;H* 

132 PAUSE 100 

133 CLS 

134 NEXT T 

150 PRINT AT 0,0;"SHIPS SUNK";S 
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T HE MARCH/APRIL edition of 
Sinclair Programs asked for 
Noughts and Crosses pro¬ 
grams in which the computer takes part. 
The problem with most of the programs 
which we received was either that the 



computer could play Noughts and 
Crosses well, in which case it would 
never lose, making the game extremely 
uninteresting, or it could play Noughts 
and Cresses badly, in which case it was 
always possible for the player to win. 

Richard Sutton of Putney, London 
produced the solution—a program for 
the 16K Spectrum in which the com¬ 
puter does not always respond to the 
same move in the same way, so that, if 
you watch for an opening, it is occasion¬ 
ally possible to win. 




2 PRINT AT 11/4 - "Press any ke 
y to start" PAUSE y CLS 

18 DATA 192.224,112,56,28,14,7 
,3.2,7,14-28-56- 112-224- 192-7-31 
-60-112-96-224,192-192-224-240-6 
8-14-6-7,3-3-192-192,224.96.112, 
60-31-7,3-3-7-6- 14,60,248,224 

11 FOR n-0 TO 47- REPO a POKE 
USR "a"+n,a' NEXT n 

12 LET d-0 

13 PRINT AT e.P; "Noughts 8. Oo 
Xses"• PAUSE 99 

15 PAUSE 5 PRINT AT 8.9;" ";A 
T 7-9;"o" BEEP .05-8 FOR n=9 
TO 20- PRINT AT 7-n >" o" ■ BEEP . 
05-8- NEXT n PAUSE 2' FOR n-7 T 
0 0 STEP -1 PRINT AT n.2l;"o";A 
T yi+1-21j "X";RT n+2.21; " “ BEEP 

.05,0 NEXT n> PRINT AT 0.21;"X 
“;AT 1.21;“ “• BEEP .05.8' PRINT 
AT 0-21;" "• BEEP .05,8 

16 PAUSE 28 PRINT AT 0,21;"s" 
> BEEP .05,8' PRINT AT 0.21;"o"; 
AT 1.21;"s" 1 BEEP .05,8' FUR n-0 

TO 6' PRINT AT n,21i” "-AT n+1. 
21-"o"- AT n+2.21;"s"' BEEP .05,8 


• NEXT tv PAUSE 2* FOR n-21 TO 9 
STEP -1 PRINT AT 7,m"o “• BEE 
P .05,8' NEXT tv PAUSE 48 PRINT 
AT 7-9; INK 2; "o" PAUSE 68 PR 
INT AT 7-9;" "jAT 8.9;"o"' BEEP 
.1,8 PAUSE 15' PRINT AT 8-9- IN 
K 0;"o" 

20 LET d-0 PRINT AT 14,4;"How 
many Players? <1 or 2)" 1 PAUSE 

0 

25 IF INKEY*-"2" THEN GO TO 50 
30 IF INKEY*< >"1" THEN GO TO 2 

0 

35 PRINT AT 20-0; "Shall I 9o f 
irst? < Y-'N >" 

40 IF INKEY*-"Y" OR INKEY*-"y" 
THEN LET FLAG-0' GO TO 200 

41 IF INKEY®< >"N“ AND INKEY*<> 
"n" THEN GO TO 35 

45 LET FLAG-1• GO TO 200 

50 INPUT "Name of Player 1? 
b* 

51 INPUT "and name of Player 2 
? "; c* 

55 CLS • PRINT AT 5-0;"Who sta 
rts first-";AT 7,0,b*;"<l>? or " 


;c*;"<2 >?" 1 PAUSE 0 

60 IF INKEY*-"1" THEN LET D-l 
65 IF INKEY*-"2" THEN LET D-2 
70 IF INKEY*< >"1" AND INKEY*<> 
"2" THEN GO TO 55 

200 CLS • PLOT 80.96 DRAW 96-0 

201 PLOT 80-64' DRAW 96-0 

202 PLOT 112-32 DRAW 0-96 

203 PLOT 144,32' DRAW 8,96 

210 PRINT AT 21,2;"Cselect with 
<> keys 8, ENTER: 1 " 

250 DIM C< 9 > DIM P<9 

254 IF d~l OR d-2 THEN GO TO 50 
00 

255 IF FLAG-0 THEN CO TO 300 

256 IF FLAC-t THEN GO TO 2200 
300 DATA 1.2.3.4.5.6-7.0.9.1.4. 

7-2,5-8-3-6,9, 1-5-9-3-5,7 
350 RESTORE 300 FOR n-1 TO d 
READ a-b-c 

355 IF PC a >+P< b >+P< c >-3 THEN GO 
TO 3000 
360 NEXT n 

400 RESTORE 30O FOR n-1 TO 8 
READ a-b-e 

405 IF c<a>+c<b>+c<c>-2 THEN GO 
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LET 


SUB 690 

410 IF FLAG*l THEN CO TO 3200 
41*5 NEXT n 

430 IF C C< 1 >+P< 1 >+C< 5 >+P< 5 >+C< 9 
)+P< 9 >~3 AND C< 2 >-»-P< 2 >+C< 3 >-*-P< 3 > 
+t < 4 HP< 4 >+C< 6 >+P< 6 >+C< 7 >+P< 7 ''+C 

< 8 >+P< 8 ^“0 > OR (C(3HP(S>*Ub)+P 

< 5 •>•»<•< 7 >+P< 7 >-3 AND C< I >+P< 1 >+C < 
2 '*P< 2 >+C< 4 >+P< 4 >+t< 6 >+P< 6 >+C< 0 > 
+PC0HCO>*P<9>«0> THEN LET x=2* 

< INT ( RNO*4 >+1 ) ’ LET c<x>-l LET 
FLAC-1 GO SUB 100O CO TO 2200 
450 RESTORE 300 FOR n-1 TO 3 

READ a,b,c 

455 IF P<*>+P<b>M><c>-:' THEN CO 
SUB 600 

460 IF FLAG-1 THEN CO TO 3500 
465 NEXT n 
530 LET n-5 

505 IF P<n>+C<n>-0 THEN CO SUB 
700 

510 IF FLAC-1 THEN GO TO 3500 
550 RANDOM 12E LET n=<2*INT <R 

ND*3»>+1 

555 FOR w=l TO 5 
560 IF P<n>*c<n>-0 THEN CO SUB 
700 

565 IF FLAG’1 THEN CO TO 3500 
570 LET n-n+2 

573 IF n-11 THEN LET n-1 

574 NEXT m 

575 LET n=n+l 
578 FOR m-1 TO 4 

590 IF n-10 THEN LET n-2 
595 IF P< n >+c< n >0 THEN GO SUB 
700 

590 IF FLAG-1 THEN CO TO 3500 
535 LET n-n+2 : NEXT m 
600 IF P<a>+c<a>-0 THEN LET e<a 
)-l- LET FLAG-l' LET x-a CO SUB 
1000 

605 IF P< b >*c< b >-0 THEN LET c<b 
>-l LET FLAC-t LET x-b' GO SUB 
1000 

610 IF P< c Hc< C ->-0 THEN LET c<c 
>«1’ LET FLAG-1' LET x-c’ GO SUB 

1000 

615 RETURN 

700 LET c< n >-l' LET x-n LET FL 
AG-1’ GO SUB 1000 RETURN 
999 STOP 

1000 LET v-1> LET h-x-4 

1005 IF x>6 THEN LET v-2- LET h- 

x-7 


1010 IF x<4 THEN LET v-0 LET b- 

1015 IF FLAG-1 THEN PRINT AT 7+v 
*4,ll+h*4; INK 3 ■ "AB'* • AT 3+v*4.1 
l+h*4;"BA" BEEP .1,3' BEEP .2.0 
1020 IF'TLaC-O THEN PRINT AT 7-*-. 
»4,lH-h*4j INK 1 j "££" ;AT 3+v*4,- 
l+h*4;“EF“• BEEP .1,0 BEEP .2, 
1025 IFTlAG-2 THEN PRINT OVER 
> PAPER 6; INK 3>AT 7+v*4,11+h* 
t" '• ; AT 8+v*4, 11 +h*4, *' “ 

1030 RETURN 

2200 PRINT AT 1,3; "YOUR tijrw. . . 

2210 LET x-1 LET FLAG-3 CO SUB 
1000 

2212 PAUSE O 

2214 LET a*-INKEY* 

2215 PRINT PAPER 7; OVER X; INK 

9;AT 7+v*4,11+ht4 j" "iAT 8*v*4, 
1 t+h*4," '• 

2220 LET x’x+<3*-"S">-<*S»"5" ■ 

IF x-0 THEN LET x-l 

2221 IF —10 THEN LET v-9 

2225 IF a*-CHP* 13 AND <0-1 OR D 

-2 > THEN CO TO 5200 

2230 IF a*-CHR« 13 THEN GO TO 23 

00 

2240 GO SUB 1000 
2250 GO TO 2212 

2300 IF P<x>-4-c<x)«l THEN BEEP .4 

.-10' GO TO 2212 

2310 LET FLAG-0' LET P<x>-1 GO 

SV18 Go To 5500 

2400 PRINT AT 1,3;" 

... MY TURN" 

2410 GO TO 300 

3000 PRINT AT 1,3; FLASH l;" 

YOU WIN! "• GO TO 

3205 

3200 PRINT AT 1,3; FLASH 1 i " 
SPECTRUM WINS! 

3204 LET FLAG-3 

3205 LET x-*' GO SUB 10OO CO SU 
B 3230 

3210 LET x-b' GO SUB 1000 GO SU 
B 3230 

3215 LET x-c GO SUB 1000' GO SU 
B 3230 

3220 GO TO 4000 

3230 FOR n-6 TO 9' PRINT PAPER 4 
) OVER 1, INK 8;AT n+v*4.10+h*4; 
" " NEXT n > BEEP .1,-8' BEEP 


.1,-12 RETURN 

3499 STOP 

3500 LET fc-0 
3510 FOR n-1 TO 9 

3515 LET «>*■€< n> NEXT n 

3520 IF t-9 THEN CO TO 4000 
3525 IF FLAG-1 THEN GO TO 2200 
3530 IF FLAC-0 THEN GO TO 240O 
40OO PRINT AT 3,13;"Another 9am* 
7 (Y/N'" PAUSE 0 
4805 IF INKEY*<>"m" AND INKEY*<"' 
”Y" THEN STOP 
4010 IF d-0 THEN RIJN 20 
4020 IF dO0 THEN PRINT AT 4.13; 
"Saw* Placers? <Y/N>"’ PAUSE 0 
4030 IF INKEY*-"*” OR INKEY*-"Y" 
THEN FOR n-1 TO 9 LET i»<n^ 
LET c<nY-8 NEXT n CLS CO TO 
55 

4040 RIJN 20 

4999 STOP 

5000 IF d-2 THEN GO TO 6010 
3010 PRINT AT t,3;b*;"'s turn... 

5020 GO TO 2210 

3O30 LET P<X>-1' LET FLAG-1■ GO 

SUB 1000 GO TO 6000 

5200 IF P< x >+c< x >-l THEN B7EP .4 

•-10’ CO TO 2212 

5205 IF D"1 THEN CO TO 5030 

5210 LET e<x>-l LET FLAG-9 GO 

SU8 100O CO TO 6500 

6000 RESTORE 300 FOR N-1 TO 8 

READ a.b.c IF p< a >+P<b >+P< c V3 
THEN PRINT AT 1,3; FLASH 1;" ", 

b*;" wins! " LET FLAG-3 GO TO 

3205 

6001 NEXT n 

6005 LET fc-0 FOR n-1 TO 9’ LET 
t-t+P<n >«■<:< n> IF t-9 THEN GO TO 


10 

6500 RESTORE 300 FOR n-1 TO 8 

READ a,b,c IF c<a >+c< b >+0' c '•-3 
THEN PRINT AT 1,3; FLASH 1;" "i 

c*i" wins! LET FLAG-3’ GO TO 

3205 

6501 NEXT n 

6505 LET t-0' FOR n-1 TO 9 LET 
t-fc+P<n)+e<n>' IF t-9 THEN CO TO 
400O 

6510 LET d-1 GO TO 500O 
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9GDG 1. REM block stop 
2 LET HO0 
9 CLS 

10 FOR B~1 TO 30 
20 PRINT AT 0,B;"<isP>";AT £l, 
Bj"<9f >" 

30 NEXT B 
40 FOR fl=0 TO 21 
50 PRINT AT A,0;"<9f>";AT A,31 
; "<9f >" 

60 NEXT A 
70 LET X~10 
60 LET Y*10 
90 LET A-l 
99 LET SC=0 
100 LET B»2 
110 PRINT AT R,B+1; 

120 LET I~PEEK < PEEK 16398+PEEK 
16399*256> 

121 LET B=B+1 

122 IF B~31 THEN LET E>2 
130 IF 1*8 THEN LET A-A-l 
130-IF 1*0 THEN LET A*A-1 

SC 

290 IF SCCHC THEN GOTO 320 
300 PRINT TAB 2;"A NEW H1GH-3C0 
RE OF ";SC;TAB 2;" HAS BEEN ACHI 
he; v 130-IF 1*8 THEN LET fl*A-l 
140 IF 1*128 THEN LET A*A+1 
150 PRINT AT A,B; "< isP >";RT fl,B 
-1j" " 

160 LET Y*Y+<INKEY**"8" AND Y<3 
0>-<INKEY**"5" AND Y>1) 

170 LET X*X-KINKEY*-"6" AND X<2 
0>-<INKEY*="7" AND X>1 > 

100 PRINT AT X/ Y; "< 9s. )" 

190 IF A*21 THEN GOTO 250 
200 LET SOSC+i 
210 GOTO 110 
250 FOR C-0 TO 20 
260 PRINT AT 10, 2; "< 91 • ie-• is • ic 
: la■ip le : 92)";AT 10,2;"< ; ie•i 
s ! ic : iaiPie-9w>"; 

270 NEXT C 

280 PRINT TAB 2;"YOUR SCORE * " 
/SC- 

290 IF SCCHC THEN GOTO 320 
3O0 PRINT TAB 2;"A NEW HIGH-SCO 
RE OF SC;TAB 2;" HAS BEEN ACHI 
300-PRINT TAB 2;"A NEW HIGH-SCO 
RE OF ";SC;TAB 2;" HAS BEEN ACHI 
EVED." 

310 LET HC*SC 

320 PRINT TAB 2;"ANOTHER GAME? 

< Y/N>" 

330 IF INKEY*-"Y" THEN GOTO 9 
340 IF INKEY**"N" THEN STOP 
350 GOTO 330 
900 SAVE "BLOCK STOP" 

910 GOTO 1 




T HE BLACK SQUARE moves 
across the screen, leaving a trail 
of black squares behind it. Its 
object is to reach the bottom of the 
screen and escape. You must prevent 
that for as long as possible. 

You are the grey square, leaving a 
grey trail. Whenever the black square 
hits a black square it will move down a 
row. Whenever it hits a grey square it 
will move up a row. When finally it 
reaches the bottom of the screen your 
score will be given. Avoid crashing into 
the border of the playing area. 

Block Stop was written by M 
Thompson of Ashford, Kent for the 
16K ZX-81. 
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O UR INITIAL reaction on play¬ 
ing Labyrinth, by Steven Vig- 
naux of Bridgwater, Somerset 
was that it surpassed comparable pro¬ 
fessional software. Perhaps that is not 
surprising for Vignaux has had more 
access to computers than the majority of 
our readers. 

His school owns five Spectrums and 
he was having lessons on them and 
practising on his ZX-81 at home until 
he upgraded to a Spectrum last Christ¬ 
mas. He is developing his programming 
skills and is learning machine code. 

On RUNning Labyrinth you will 
find yourself inside the entrance of a 
large maze, from which it is your object 
to escape. Three-dimensional views of 
the maze to north, south, east and west 
can be obtained at the press of a button. 
When you are completely lost, press 
“H” and a plan of the maze will be 
displayed briefly, but that option is 
available only five times during your 
journey (16K Spectrum). 


10 CLERR GO SUB 8000 
20 RESTORE 9000 CO SUB 9000 
30 PRINT RT 21,0; FLRSH It” 
PRESS RNY KEY 

40 IF INKEY**"” THEN GO TO 40 
50 BRIGHT 0 

60 FOR n-9 TO 21- PRINT RT n,0 
;,, ■ NEXT n 

70 PRINT RT 10,1j"P ress ~Y~ fo 
r the instructions" 

80 IF INKEY*-"" THEN GO TO 80 
90 IF INKEY*-"Y” OR INKEY»-"a" 
THEN GO SUB 8200 
100 LET b*-"8"■ LET d-1> LET m- 


LET *«1 


110 LET P-0- LET j 
120 LET xl-x- LET 
140 BORDER 7 PRPER 7 CLS 


IN 


150 GO TO 500 

220 IF a*-"5" THEN LET b*«a*= L 
ET d— 1- BEEP .2,10- GO TO 500 
230 IF a*-"8" THEN LET b*-a* L 
ET d-1- BEEP .2,10- GO TO 500 
240 IF a*-"6" THEN LET b*-a*. L 
ET d-1 BEEP .2,10- GO TO 500 
250 IF a*-"7" THEN LET b*-a*- L 
ET d-1- BEEP .2,10- GO TO 500 
260 LET a*-INKEY*- IF a*-"" THE 
N GO TO 260 

270 BEEP .2,0- IF a*» M H" OR a»- 
"h" THEN LET P-P+l- IF P<-5 THEN 
BEEP .2,10 GO SUB 1000 GO TO 
500 

280 IF a*—"0" THEN GO TO 300 
290 GO TO 220 

30© IF b*-"8" THEN LET *1-*1+1 
310 IF b*="5" THEN LET «1-v1-1 
320 IF b*="6" THEN LET xl-xl+1 
330 IF b*="7" THEN LET xl-x1-1 
400 BEEP .2,10- CLS 
410 IF *1=0 RND xlOlS THEN LET 
*1-1- PRINT RT 2,3;"You are tr» 
in9 to leave b*"jAT 4,3;"9oin9 t 


hrou9h the entrance";RT 6,ll;"Tr 
* a9ain"- FOR n-0 TO 250 NEXT n 
GO TO 500 

420 IF xl-15 AND *1-1 THEN LET 
m=m+l- GO TO 3000 
430 IF a< xl,* 1)-l THEN PRINT RT 
10,2;"You cannot 9o throuSh wal 
Is."; AT 12,12;"Tr* a9ain"- FOR n 
-0 TO 200 NEXT n- LET xl-x- LET 
»l-a- GO TO 500 
440 LET rx-m+1 

500 CLS - PRINT RT l,6;"You are 
look in9 "; d*< < VRL b*>-4> 

510 PLOT 8,0- DRAW 0,175- PLOT 
247,0 DRAW 0,175 
520 IF b*-"8" OR b*-"5" THEN GO 
TO 800 

530 LET x—xl- LET *-*l 
540 LET dl-d- FOR i-1 TO 5 
550 IF a< x+d,* >*1 THEN GO SUB < 
i*10 >+2000 - LET d-dl- GO TO 260 
560 IF a<x+d,*-l>=1 THEN GO SUB 
< i*10 >+2060 - GO TO 580 
570 GO SUB <i*10>+2210 
580 IF a<x+d,*+l>-l THEN GO SUB 
<i*10>+2110= GO TO 600 
590 GO SUB <i*10 5+2160 
610 LET d-d+dl- NEXT i 
620 LET d-dl GO TO 260 
800 LET x—x1 1 LET *=*1 
810 LET dl-d FOR t=l TO 5 
815 IF *+d=0 AND x<>15 THEN GO 
TO <i*10>+2490 

817 IF *+d=0 OR *+d-32 THEN IF 
x—15 THEN GO TO <i*10>+2590 
820 IF a< x,a+d >-l THEN GO SUB < 
i*10>+2000= LET d-dl- GO TO 260 
830 IF a<x-1, *+d)-l THEN GO SUB 
<i*10>+2060 GO TO 850 
840 GO SUB <i*10 >+2210 
850 IF a<x+1,*+d>-l THEN GO SUB 
<i*10>+2110- GO TO 870 
860 GO SUB (i*10 >+2160 
880 LET d-d+dl- NEXT i 


890 LET d-dl- GO TO 260 
1000 BORDER 7 PAPER 7- CLS - IN 
K O 

1010 PRINT AT 0,8;"PLAN OF MAZE 


1020 FOR n-1 TO : 


FOR b-1 TO 3 


1030 IF a<n,b>-l THEN PRINT AT n 
•b; 

1040 NEXT b- NEXT n 

1050 IF x-9 AND s = l THEN PRINT R 

T 9,0;">" 

1060 PRINT RT x,*; FLRSH 1;"X" 
1070 IF x< >9 OR *<>1 THEN PRINT 
AT 9,1;">" 

1080 PRINT RT 15,1;"<" 

1100 PPINT £1;" YOU RRE WHERE 

1110 PRINT £0j" ENTRANCE « > 
EXIT - <" 

1130 FOR n-0 TO 50 
1140 BEEP .05,n- BEEP .05,50-n 
1150 NEXT n 
1160 CLS - RETURN 
2010 DRAW -239,0- PLOT 8,0 DRAW 
239,0- RETURN 

2020 PLOT 48,32- DRAW 159,0- PLO 
T 48,144- DRAW 159,0- RETURN 
2030 PLOT 80,56- DPAW 95,0- PLOT 
80,120- DRAW 95,0- RETURN 
2040 PLOT 104,72 DRAW 47,0 PLO 
T 104,104. DRAW 47,0- RETURN 
2050 PLOT 120,80 DRAW 15,0- PLO 
T 120,96- DRAW 15,0 RETURN 
2060 RETURN 

2070 PLOT 8,0- DRAW 40,32- DRAW 
0,111 DRAW -40,32 - RETURN 
2080 PLOT 48,32- DRAW 32,24- DRA 
W 0,64- DRAW -32,24- RETURN 
2090 PLOT 80.56- DRAW 24,16- DRA 
W 0,32- DRAW -24,16- RETURN 
2100 PLOT 104,72 DRAW 16,8- DRA 
W 0,16- DRAW -16,8- RETURN 
2110 PLOT 120,30= DRAW 8,8- DRAW 
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-8,8= RETURN 

2120 PLOT 247,173= DRAW -40,-32= 
DRAW 0,-111= DRAW 40,-32= RETUR 
N 

2130 PLOT 207,32= DRAW -32,24= D 
RAW 0,64= DRAW 32,24' RETURN 
2140 PLOT 173,56 DRAW -24,16= D 
RAW 0,32= DRAW 24,16= RETURN 
2150 PLOT 151,72= DRAW -16,8= DR 
AW 0,16= DRAW 16,8= RETURN 
2160 PLOT 135,80= DRAW -8,8= DRA 
W 8,8 RETURN 

2170 PLOT 247,32 DRAW -40,0= DR 
AW 0,112= DRAW 40,0= RETURN 
2180 PLOT 207,36= DRAW -32,0= DR 
AW 0,64= DRAW 32,0= RETURN 
2190 PLOT 175,72 DRAW -24,0= DR 
AW 0,32= DRAW 24,0= RETURN 
2200 PLOT 151,80= DRAW -16,0 DR 
AW 0,16 DRAW 16,0= RETURN 
2210 PLOT 127,88 DRAW 8,0= RETU 
RN 

2220 PLOT 8,32= DRAW 40,0= DRAW 
0,112= DRAW -40,0= RETURN 
2230 PLOT 48,56= DRAW 32,0= DRAW 
0,64 DRAW -32,0= RETURN 
2240 PLOT 80,72= DRAW 24,0= DRAW 
0,32 DRAW -24,0 RETURN 
2250 PLOT 104,80= DRAW 16,8= DRA 
W 0,16= DRAW -16,0 RETURN 
2260 PLOT 127,38= DRAW -7,0 RET 
URN 

2500 PLOT 8,160= DRAW 239,0 PLO 
T 3,151- DRAW 239,0 PRINT AT 2, 
8;"E N T R A N C E" LET d-dl= G 
0 TO 260 

2510 PLOT 48,136= DRAW 159,0= PL 
OT 4e,127 DRAW 159,0 PRINT AT 
5, 12;"ENTRANCE"= LET d-dl = GO TO 
260 

2550 LET d=dl= GO TO 260 
2610 PLOT 48,136 DRAW 159,0 PL 
OT 48,127= DRAW 159,0 PRINT AT 
3,14,"EXIT" LET d-dl GO TO 260 
2700 GO TO 260 

3000 BORDER 1 PAPER 1 CLS = IN 
K 7= BRIGHT 1 

3010 PRINT AT 21.n. FLASH t;"<sP 
i95=2*SP 196 93 i96 95 2*93 i97 
• 96 = sP'94 = 92•194 = 93 = 96 91 97 93 = 
95= 197 = SP i93 = 93 i94 92= 195 = sP =9 
5 = sP >"= RANDOMIZE USR 3280 
3020 PRINT AT 21.0, FLASH 1 ;"<sP 
i95 2*sP = i9l i93 = i92 95 2*93 i9 
7 = sP 96 = 92 = sP = i9l i93 i96 sP =95 = 
SP -95 9! 197= i95 SP ' i95=SP i94 9 
3 = 97 = sP >" RANDOMIZE USR 3280 
3030 PRINT AT 21,0; FLASH 1;"<SP 
= i9l i93 197=i95 SP= 2*95 = 2*i93 = 9 

2 = sP = 95 = 2*sP 1 i95'SP 96 = 94 i92=i9 

3 = 95 = SP 91 = 195 = sP ' 195 = sP = i 93 = sP = 
95=sP>" RANDOMIZE USR 3280 
3035 PRINT AT 21-0; PLASH 1; •• 

3040 FOR n-0 TO 16 
3050 RANDOMIZE USR 3280 
3060 NEXT n 
3070 BRIGHT 1 

3080 PRINT AT 8,3;"You mana9ed t 
o 9et out in" 

3090 PRINT AT 9,3;m;" moves." 
3100>IF P-0 THEN PRINT AT 11,0;" 
You did not ask Tor- Help at all" 

3110 IF P-1 THEN PRINT AT 11,3;" 
You asked for Help once." 

3120 IF P=2 THEN PRINT AT 11,3;" 
You asked for Help twice." 

3130 IF P >2 THEN PRINT AT 11,2;" 
You asked for help ";P;" times" 


3140 PRINT AT 15,0;"Would you 11 
ke to see tHe maze you Have con 
4uered a9ain ?" 

3150 PRINT AT 18,8;"Press ~Y~ if 
YES" 

3160 IF INKEY*-"" THEN GO TO 316 
0 

3170 IF INKEY*-"Y" OR INKEY*-"y" 
THEN GO SUB 4000 
3180 FOR n-15 TO 18= PRINT AT n, 
0;,,= NEXT n 

3190 PRINT AT 15,0;"Would you 11 
ke to Play a9ain 7" 

3200 PRINT AT 18,8;"Press ~Y~ if 
YES" 

3210 IF INKEY*- 1 '" THEN GO TO 321 
0 

3220 IF INKEY*-"Y" OR INKEY*-“y" 
THEN GO TO 3240 

3230 BRIGHT 0= BORDER 7 PAPER 7 
CLS = INK 0= STOP 
3240 GO TO 10 

4000 BRIGHT 0= BORDER 7= PAPER 7 
= CLS INK 0 

4805 PRINT AT 0,10;"PLAN OF MAZE 

4010 FOR n-1 TO 20 
4020 FOR i-1 TO 31 
4030 IF a<n,i>-l THEN PRINT AT n 

,i; 

4040 NEXT i= NEXT n 

4050 PRINT £0;" PRESS ANY KE 

Y TO RETURN " 

4060 IF INKEY*-"" THEN GO TO 406 


0 

4070 CLS = RETURN 

800O BORDER 1= PAPER 1 CLS = IN 

K 7= BRIGHT 1 

8005 PRINT AT 21.0; FLASH 1;” 

RANDOMIZE USR 3280 
8010 PRINT AT 21,0, FLASH !;"<sP 
i95 2*SP = 196 93 = 96-95 = 2*93=i9? 
96 = sP 94 92 =i94 93'96 = 91 97 = 93 = 9 
5=i97 = sP•i95 = 93 =i94 = 92=i95 = sP=95 
=sP>"= RANDOMIZE USR 3280 
8020 PRINT AT 21.0; FLASH 1;"<SP 
195’2*sP>i9l■i93=i92=95=2*93=i9 
7 = sP= 96 - 92’sP'191 = 193=i96 = SP = 95 = 
SP =95 = 91 = i97=i95 = sP = i95 = sp i94 = 9 
3 = 97 = sP >"= RANDOMIZE USR 3280 
8030 PRINT AT 21,0; FLASH 1;"<sP 
= 191 = 193=197=i95 = sP =2*95 = 2*193 9 

2 = sP 1 95 = 2*sP = 195 = sP 96 = 94=i92-i9 

3 = 95 = sP = 91 = i95 = sP = i95 = sP•i95 > sp = 
95 = sP >"= RANDOMIZE USR 3280 
8035 PRINT AT 21,0; FLASH 1;" 

8040 FOR n-0 TO 16 
8050 RANDOMIZE USR 3280 
8060 NEXT n 

8070 PRINT AT 9,8;"By Steven Vi9 
naux" 

8080 PRINT AT 12,2;"Please wait 
while I work out" 

8090 PRINT AT 14,12;"the maze" 

8100 RETURN 

8210 PRINT AT 10,1;" 
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8220 PRINT RT 6,2;"The object of 
the Seme is to","find your way 
out of the mare." 

8230 PRINT " If while trying to 
find your was out of the maze 
you find youare completely lost 
then you can9et some help by Pre 
ssin9 ~H~. Once you have Press* 
d the key the screen will clea. 

r and you will be shown a Plan 

of the maze. This will indi 
cate your Position in the maze 
, the exit and the entrance. Ho 
wever the Plan will only remai 
n on view for a short Period o 
f time." 

8240 PRINT RT 21,0;" PRESS RNY 
KEY TO CONTINUE 

8250 IF INKEY*="" THEN GO TO 825 
0 

8260 BEEP .2,0 ; BEEP .2,10 
8270 FOP n-6 TO 21 PRINT RT n,B 
;,,■ NEXT n 

8275 PRINT RT 6,0;" Another thi 
n9 about the Plan of the maze i 
s that you are onlygiven access 
to it five times." 

8280 PRINT " Once the game star 
ts you wit 1 be given a three dim 
ensional representation of th 
e maze as you would see it. Th 
is view is governed by the dire 
ction in which you are look in 
9. You can look either north,so 
uth,east or west." 

8290 PRINT " When you move you 
move one Place forward in the 

direction you are lookin9." 
8300 PRINT RT 21,0;" PRESS ANY 
KEY TO CONTINUE 

8310 IF INKEY*-"" THEN GO TO 831 
0 

8320 BEEP .2,0 8EEP .2,10 
8330 FOR n-6 TO 21- PRINT RT n,0 
;,,• NEXT n 

8340 PRINT RT 6,0;"Keys for look 
in9 in different directions■" 
8350 PRINT J " WEST SOUTH N 
ORTH ERST" 

8360 PRINT " 5 6 

7 8" 


8370 PRINT '"As indicated by the 
arrows abovethe key." 

8375 PRINT J "Press ~0~ to move o 
ne Place forward in the dire 

ction you are lookin9." 

8380 PRINT Press ~H~ fo 

r HELP" 

8390 PRINT RT 21,0;" PRESS R 
NY KEY TO PLRY" 

8400 IF INKEY*-"" THEN GO TO 840 
0 

8410 BEEP .2,0’ BEEP .2,10 
8420 BORDER 7 PRPER 7’ CLS IN 
K 0 

8430 RETURN 

9000 DIM a(20,31> ; DIM d*<4.5> 
9010 FOR n-1 TO 20 
9020 READ b* 

9030 FOR i-1 TO 31 
9040 LET a< n,i>=VRL b*<i> 

9070 NEXT i 

9080 NEXT n> BEEP .2,0 
9090 BEEP .2,10 

9095 FOP n-1 TO 4 READ d*(n>‘ N 
EXT n = RETURN 

9100 DRTR "111!11111111111111111 
1111111111" 

9110 DRTR "101001000101000000000 
0100100001" 

9120 DRTR "100011010101011101111 
0010001101" 

9130 DRTR "101001011101010101000 
1010100001" 

9140 DRTR "101111010001010001010 
1010111111" 

9150 DRTR "100000000111011111010 
1000100001" 

9160 DRTR "101010111000000000000 
1010101101" 

9170 DRTR "101010100011010101O10 
1010000011" 

9180 DRTR "001010101010010101010 
1010111001" 

9190 DRTR "101110000000110101011 
1010101111 " 

9200 DRTR "101010111110010100010 
0010000001" 

9210 DRTR "111000101011100011011 
1110101101" 

9220 DRTR "100011101010111100010 
0000101001" 

9230 DRTR "111110000000101001111 



1111101011" 

9240 DRTR "001011101011101010000 
0001001001" 

9250 DRTR "101000001000001010111 
0101111011" 

9260 DRTR "101011111101111110001 
0100000001" 

9270 DRTR "1O00O1000001000001111 
0111011101 " 

9280 DRTR "101018010100011100000 
0001000001" 

9290 DRTR "111111111111111111111 
1111111111 " 

9300 DRTR "WEST","SOUTH","NOPTH" 
"ERST" 



W HEN THIS GAME is RUN 
you find yourself at the bot¬ 
tom of the screen with a 
horde of dark shapes above you in the 
air. Maddened by that intrusion on 
your airspace, you rush from side to 
side, using keys “1” and “A”, shooting 
at the shapes with key 0. The game ends 
with your score if you shoot an empty 
space or if you run out of time. 

Space Craze was written for the IK 
ZX-81 by P Roberts of Leominster, 
Herefordshire. l —■ 


DDT 1 LET L®VAL "9" 

2 LET S~SGN PI 

3 CLS 

10 FOR N-ll TO 20 STEP .03 
20 IF RND>.5 THEN PRINT RT N,R 
ND*i5+2; 

30 LET L«L+<INKEY#*"A" RND L<1 
7 )-<INKEY#®"1" RND L>2) 

40 PRINT RT 21;L-2i"<sP=93=isP 
• 94 : BP >" 

50 IF INKEY#®"0" THEN GOSUB 13 

0 

60 NEXT N ' 

100 PRINT RT N;0jS 
110 PAUSE VRL "4E4" 

120 RUN 

13U FOR fl-CODE " = " TO CODE "<9d 
STEP -CODE "< 91 V 

131 PRINT RT A,Li 

132 IF PEEK <PEEK 16398+256*PEE 
K 16309 >“21 THEN GOTO 140 

133 PRINT "<95>" 

133-PRINT m <95>" 

134 PRINT RT A,Lj" " 

136 NEXT R 

137 GOTO VRL "100" 

140 LET S*S+C0DE "C9l>" 

141 PRINT " " 

142 RETURN 
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S TOP THE ALIENS landing at 
their base on the planet Krypton. 
You have six laser bases, each of 
which is activated by the correspond¬ 
ingly-numbered key on your 16K ZX- 
81. As the aliens do not move smoothly 
but jump it is not sufficient to press one 
key continuously. 

Laser Blast was written by Philip 
Cole of Rickmans worth, Hertfordshire. 


4 100 LET I*=" 

INSTRUCTIONS?" 

110 PRINT AT 5,0;1* 

120 LET I*-=i®<.2 TO -+»*< 1 > 

130 IF INKGY*-"N" THEN GOTO 150 
140 IF INKEY*< >"Y 1 ’ THEN GOTO 11 

0 

150 Ir INKEY*«"Y" THEN G02UU VO 


2639 REM 

2700 IF F<=0 THEN GOTO 6000 
2705 PRINT ITT X,S+K;S* 

2710 LET K-CINT <RND*5>-6> 

2720 LET 2-<INT <RND*3>+1> 

2730 LET X-X+2 

2740 IF X>«2U THEN GOTO 3200 
2750 PRINT FIT X.S-HOP* 

2760 LET Y=0 

2770 IF INKEY*”"1" THEN LET Y^2 
2760 IF INKEY*="2" THEN LET Y«7 
2790 IF INKEY**"3" THEN LET Y-12 
2800 IF Y-2 OR Y-7 OR Y-12 THEN 
GOTO 3000 

23fGT IF'"fNKEYS-“4" THEN LET Y-4 
2820 IF INKEY*-"5" THEN LET Y-9 
2830 IF INKEY*-"fc" THEN LET Y»14 
2840 IF Y-4 OR Y=9 OR Y-14 THEN 
GOTO 310O 
2350 GOTO 2700 
2337 PEM 

2938 REM ***FIRE*** 

2939 REM 

3000 PRINT AT Y,2;L*;AT Y,2;0* 
8010 LET F=F-10 

3020 PRINT RT 21,19;8*;RT 21,19; 
F 

3030 IF X-Y THEN GOTO 5000 
3040 GOTO 2700 

3099 REM 

3100 PRINT RT Y,0;L*;RT Y,0;0* 
3110 LET F-F-10 

3120 PRINT RT 21,I9;S»;AT 21,13; 
F 

3130 IF X-Y THEN GOTO 5000 
3140 GOTO 2700 

3197 REM 

3198 REM ***LRNDED*** 

3199 REM 

3200 LET T-T-10 

3210 PRINT RT 2l,6;SS;RT 2l,6;T 
3220 GOTO 2500 
4937 REM 

4996 REM ***ZRP*** 

4939 REM 

5O00 PRINT RT X.S+K; "<iz u ifV' 
5010 IF fl-I OR R~2 OR fl«3 OR A~4 
THEN LET T-T+25 

5020 IF A=5 THEN LET T-T-KINT <R 
ND*100>+l> 

503O IF A-6 THEN LET F-F+70 


5040 FOR N-0 TO 20 
5050 NEXT N 

5060 PRINT RT 21,6;S*;AT 21,6;T 
5870 PRINT RT 21,19;S*;AT 21.13; 
F 

5880 PRINT RT X,S+K;S* 

5890 GOTO 2500 

5999 REM 

6000 REM t**THE END*** 

6010 REM 

6020 CLS 

6025 PRINT RT 2,1;"YOU SCORED- " 
; T 

6030 IF T<-180 THEN PRINT RT 2,1 
;RT 10,4;"WHRT RN EMBARASSMENT. . 

6035 IF T<500 AND T>100 THEN PRI 
NT RT 10,4;"NOT BAD I SUPPOSE. 

6040 IF T>«500 THEN PRINT RT 10, 
4;"WELL DONE" 

6050 PRINT RT 20,0;"DO YOU WANT 
TO HAVE ANOTHER GO?" 

6060 IF INKEY*-"N" THEN GOTO 699 
9 

6070 IF INKEY*-"Y" THEN GOTO 10 
6080 GOTO 6060 

6999 STOP 

7000 REM **#INSTRUCTIONS*** 

7010 REM , 

7015 CLS 

7020 PRINT TAB 10;"INSTRUCTIONS" 
; TAB 9; "«««=————" 

7030 PRINT AT 2,2;"THE AIM OF TH 
E GAME IS TO STOPTHE ALIENS FROM 
LANDING AT THEIRSPACE STATION 0 
N KRYPTON." 

7040 PRINT AT 6,1;"USE KEYS 1,2. 
3,4,5,6 TU FIRE." 

7050 PRINT AT 0,1;"THE ALIENS AR 
E ■ -" 

7060 PRINT AT 10,0;"1. <>-WORT 
H 25 POINTS";AT 12,0;"2. ?-WORTH 
0-100 P0INTS"JAT 14,0;"3. F-WOR 
TH 70 FUEL POINTS" 

7070 PRINT RT 17,7;"GOOD LUCK... 

";AT 20,16;"ANY KEY TO START" 
7080 IF INKEY*-"" THEN GOTO 7060 
7090 RETURN 
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I PAPER 


COPPER 7 INK 0 C 


2 LET 9o=0 

5 FOR P-1 TO 4 REOP ?* FOR 
n=0 TO 7 

10 REAP or POKE USR a*+n,m 
15 NEXT n- NEXT p 
20 DATA “a",0,16,56,124,254,12 
4,56,le 

2b PRTO »b",0,56,56,IE,214,254 
,214, 16 

00 DATA H c , 0,108,254,254,124, 

124.56.16 

35 ONTO "d",0,16,56,124,254,25 

4.214.16 

40 PRINT OT 1,9;" POKER " 
42 PRINT OT 4,0:" The compute 
r Mill deal you a"'"five card PO 
KER hand ana vou"' "delete ae. roan 
y cards as you wish"'"in an atte 


‘POKER" 

1 The compute 
’"five card PO 
‘delete as man 
i"'"in an atte 





mPt to obtain a 9ood"'"winnin* h 
and." 

44 PRINT AT 10,0;" The comPut 
er ?>ives you 20"'"credits to st.a 
rt with and you"'“bet (LIMIT 10 
credits’* before"'"each hand is d 
ea.lt" 

46 GO SUE 1400 

49 CLS PRINT m 2,0" Winni 

n9 hands are Paid-";AT 4,5;"2 P 
AIR - — Evens";AT 5,5;"3 OF 

— 2/1";AT 6,5;"RUN 

— 4/t";AT 7,5;"FLUSH — 5/ 

50 PRINT AT 8,5;"FULL HOUSE — 

9/1"iAT 9,5;"POKER — 14/1 

";AT 10,5;"ST FLUSH — 20/l";A 
T 11,5;"ROYAL FLUSH-- 58/1" 

56 GO SUB 1406 

60 CLS PRINT AT 2,0;" The k 
eys used are-";AT 4,5;"O — bet 
(rePeat key)";AT 5,5;"9 — deal 
";AT 6,5;"8 -- draw";AT 7,5;"7 - 

- stand";AT 8,5;"6 — cancel";AT 
9,5;"1 to 5 — delete cards" 

62 GO SUB 1400 

71 DIM s*<4V PIM z*(41- DIM t 
( 51 • DIM v<5 > ! DIM c< 5>' PIM h<8 
v DIM P*<8, 11 1 

72 FOR i=l TO 4 READ s*< l 1 R 
ERD z *<i ) - NEXT i 

73 DATA "a", "A", "b", "K‘*, "c", "0 

74 FOR 1=1 TO S REAP b(i>- NE 
XT l- DATA 1,2,4,5,9,14,20,50 

75 FOR i=l TO 8’ READ P*<l1 N 

EXT i* DATA "2 PAIR", W 3 OF","RUN 
","FLUSH","FULL HOUSE","POKER"," 
ST FLUSH","ROYAL FLUSH" 

76 LET credit=20’ LET bet=0 

77 PAPER 4- CLS GO SUB 2680 

79 IF credlt=0 THEN GO SUB 400 
0 GO TO 76 

80 FOR i»l TO 5 
85 GO SUB 1010 

92 NEXT i 

93 LET bet”0 

94 PRINT AT 20,16;" 

95 PRINT INK 7;AT 21,23;" 

BET" 

97 LET a*=INKEY*' IF a*="0" TH 
EN PAPER 4' CLS GO TO 105 
1O0 GO TO 97 

104 PRINT INK 7;AT 21,27;"PEAL" 
GO SUB 1580 

105 IF a*="0" AND credits AND 
bet<10 THEN LET bet-bet+1* LET c 
redit=credit-l GO SUB 2600 DEE 
P .1,15 GO TO 104 

111 IF a*<>"9" THEN GO TO 104 

112 LET x-0 LET f=7 FOR P=1 T 
0 13 STEP 3 : GO SUB 500 GO SUB 
559' NEXT P PRINT INK 7;RT 20,1 
8;"DELETE & DRAW";AT 21,23;"OR S 
TANP" LET set=l GO SUB 3000• L 
ET set=0 

115 GO SUB 150O 

117 IF a*="7" THEN CO SUB 3000 
GO TO 79 


V.VoY; 

(i °,,oteo 


/°cV 0 V°( 

dir-A 

If 0 o O o 

W Q O O0 0 o fYoZir] 
0 ° 0° n °0 a O e 
o ° 0 0 & o 0 J 
r^°. oo o 


/ o °6°ck V 
)o°o 0 °o o\Jm 

O o 0 o 0 o o% 

°6° ° 6 r °i 

°0 °o° C O 0 I 

D o 0 0 O ° 0 H 


Vo o o 0/ J ° 1 V 

itVo OO/Oo °4 V 
rBko o/ 0 o o 0 1 ' 
o°o. <A 
b ° oO o 0 \ 
U°’ °_ 0 Go°0 \ 
E °o o o 0 0 0 
|o ^o o°.o4 
gA°40 0.°o4 





118 IF a*-"8" THEN PAPER 4 CLS 
GO SUB 2608' FUR i = l TO 5 CO 

SUB 1G10 NEXT i LET ,x=0 ■ FOR 
P=1 TO 13 STEP 3' CO SUB 580- GO 

SUB 559 NEXT P GO SUB 3000 * G 
0 TO 79 

119 GO SUe 2000 

128 GO SUB 1500 

121 IF a*="8" AND 1=1 THEN GO T 
0 118 

122 IF *•< >"8" THEN GO TO 127 

123 GO SUB 1708 CO SUB 2500' C 
0 SUB 3000 

126 CO TO 79 

127 IF a*="6" AND 1=0 THEN CO S 
UB 2500- GO SUB 2080 

128 FOR 1=1 TO 5 

129 IF a*=STR* i THEN LET l-O 
LET j(i1-l LET f-4 LET P=3*i-2 

GO SUB 5O0 GO TO 120 

130 NEXT l 

135 GO TO 120 

500 TOR m-2 TO 9 

520 FOR 4=0 TO 4 

530 PRINT PAPER f;AT m,2*P+4 '' 


540 NEXT 4 NEXT m 
550 RETURN 

559 LET x=y+1 

560 IF v< y><- 9 THEN PRINT r *APtP 
7; AT 2,2*P;vC.y>+1 

570 IF v(y»- 10 THEN PRINT PAPE 
R 7;AT 2,2fP;z*<14—v< v > > 

575 IF t'.yv-l OR t< Y >-? THEN LE 
T z=2 

576 IF t<x>-2 OR t<x>=4 THEN LE 
T z=0 

5P0 PRINT PAPER 7: INK z;AT 3,2 
tP ; s*< t< y ’• 1 
585 BEEP .05,5 
590 RETURN 

1018 LET rc i i-TNT <RNP.*52’*+1 
1020 IF 1-1 T HLN CO TO 1050 

1030 FOR m-t TO 1-1 |T c< i ,-c< m 
1 THEN GO TO 1010 
1040 NEXT m 

1050 LFT tc i 1=1 NT <(c( l l-i i/!3i+ 

1 

1060 LET v< l 1=c< i >-( t< l 1-1 1*13 
1070 RETURN 

1400 PRINT AT 21,2; FLASH 1;"Pre 
•££ any key to continue" 
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D ANNY O’REILLY of Belfast, 
has sent a version of the arcade 
Poker routine. You are given 20 
credits and must bet whatever you dare. 
Your cards are dealt and you can hit 
keys 1 to 5 to change them. Key 8 will 
deal an entire new hand. You are play¬ 
ing, not against the computer, but 
against certain fixed odds which are 
displayed at the start of the program. 

Full instructions are given and the 
program induces the same sleepy-eyed 
fascination as a fruit machine (16K 
Spectrum). 

Graphics notes: 73—graphic A; 
graphic B; graphic C; graphic D. 


rbye let dinkey* ir a*-"" the 

N GO TO 15Q0 
1503 RETURN 

1700 FOR rl TOY IF j< i >-0 THE 
N GO TO 1705 

1701 LET cO -INT <RMv*32>+l 

1702 FOR m-1 TO 5 ir i-m THEN L 
0 TO 1704 

1703 IF c< l 1=c< i*) 1 THEN GO TO 170 
O 

1704 NEXT m GO 008 1050 

1705 NEXT i RETURN 

2000 DIM .K51 LET 1*1 

2001 RETURN 

2500 FOR l-l TO 5’ ir i '•-0 THE 
N CO TO 2502 

2501 LET f~7 LET ! LT 

=1-1 GO SUB 500 GO SUB 559 
3502 NEXT i 

2503 RETURN 

°F00 PRINT INF 7 OT (i . O . "C REDITS 
" TOR 20:"BET" 

2601 PRINT INK 7. AT l,4;eredit;T 
AB 28;bet 
2610 RETURN 

3000 DIM w ' : • C*!H <X4V e< 
91 let NL1--I l ET s-n 


FOR i —t TO 5 LPT 

. • i •+« I 1: T t' . • —r' + ( i ••»+» 

NEXT i 

>005 FOR l-l TO 17 
2010 IF n< l 1-2 THEN LET r< 1 > >-r<' 1 
'+1 

202O IF wCO-2 then LET r' 2 —• 
•1075 i r * —/t t:ji o i r - ~<rv-t 
;U3M HI.XT i 
3040 FOR j-t to i • 

3045 IF wt i V 1 THTM >.:» TO 7060 
3050 LET s~s+l IF s-5 THEN GO T 
0 3065 

3052 IF i-4 AND s=4 AND n< 131-1 
THEN GO TO 3065 
3055 NEXT l 

3060 LET s=0 NEXT i GO TO 3060 
3065 LET N3)«l 

3070 IF s-5 RNO i = 13 THEN LET r< 
9 >=1 

3080 IF r< 21=1 RNO K1 1=0 THEN L 
ET r< 51=1 

3090 FOR 1 = 1 TO 4 IF e<l 1-5 THE 
N LET r< 41=1 
3108 NEXT i 

3110 IF r< 31=1 AND r<41=l THEN L 


ET r< 71=1 

3120 IF K9M RNO r<4)=l THEN L 
ET r< 81=1 

3130 FOR i=8 TO 1 STEP -1 
3140 IF r<i 1=1 THEN GO TO 3160 
3150 NEXT l RETURN 
3160 PRINT FLASH 1; INK 7;AT 13, 
12;"WINNER" 

3163 PRINT INK 7; AT 15,12;P*<i> 
3165 IF set=l THEN RETURN 
3170 LET win=h<i>*bet+bet 
3180 FOR 1 = 1 TO win 
3190 LET cr*dit=credit+l PRINT 
INK 7;AT 1,4;credit BEEP .2,15 
PAUSE 30 

3200 NEXT i> RETURN - 
4000 PRUSE 100 PAPER 7 CLS • L 
ET 90=90+1 PRINT RT 11,2;"You h 
*ve run out oF credits",AT 12,3; 
"Do you wish to Pl*y a9am?" iRT 
13,11; Y or N1" 

4801 INPUT a* IF a*-"Y" OR **-" 
y " THEN RETURN 

4002 CLS PRINT RT 11,0;"You hj. 
ve lost " 9ot20;" money umts";fl 
T 12,4; FLASH !;"THANK YOU FOR P 
LAYING"• STOP 


SINCLAIR PROGRAMS August 1983 


35 









SM 

aVTO 


ATCH THE falling star in your 
1 basket. Move left with key “1” 
and right with key “2”. When no 
key is being pressed the basket will 
move steadily to the right. Movement is 
limited because the game takes place in 
a small area surrounded by a frame and 
colliding with the right-hand side of the 
frame will cause you to explode. 

Star Catch was written by P D 
Lodge of Chelmsford, Essex for the 
16K ZX-81. 


10 

LET 8=8 

260 PRINT AT 12,A;" 

< 2*sP : 96 : 96 : 

20 

LET 8=0 

95 ! sP V 


30 

LET 04 

270 IF 1=12 AND A+3 

=H OR 1=12 A 

40 

LET D«5 

ND A+4=H THEN LET B= 

B+l 

50 

LET E=26 

280 IF A-l>12 THEN 

GOTO 230 

60 

FOR F=D TO E 

290 LET A=A+1 


70 

PLOT E+10,F+10 

300 PRINT AT 10,20; 

"SCORE*";B 

80 

PLOT F+10,E+10 

310 NEXT I 


90 

PLOT 0+10,F+10 

320 GOTO 150 


100 

PLOT F+10,0+10 

330 PRINT AT 11,14; 

"< sP : 9y : 95 : 9 

110 

NEXT r 

tv 


120 

FOR 0=8 TO 17 

340 PRINT AT 12,14; 

"<2t9y « 98 • 9t 

130 

PRINT AT 13 , G; "< 9h >" 

V 


140 

NEXT G 

360 PRINT AT 11,15; 

"CsP ! 2*92 > " 

: 150 

LET H*INT <RND*17>+1 

370 PRINT AT 12,15; 

"< SP • 9y • 9r V 

160 

IF H<8 THEN GOTO 150 

390 PRINT AT 12,14; 

"< 3YsP • 9yV 

170 

FOR 1=4 TO 12 

410 PRINT AT 12,14; 

"<4*sP >" 

180 

PRINT AT I,H;"*" 

430 PRINT AT 11,14; 

H •• 

190 

PRINT AT I, H; " " 

440 LET 0=0-1 


200 

2 

IF INKEY**"1" THEN LET R*R- 

450 IF 0*0 THEN GOTO 480 

460 LET R=7 

210 

IF INKEY**"2" THEN LET R*A+ 

470 GOTO 150 


1 


480 PRINT AT 21,2;" 

* PRESS ANY 

220 

IF fl<5 THEN LET R=5 

KEY TO RESTART *" 


230 

PRINT AT 12,7; "< 98 V 

490 PAUSE 1O000 


240 

PRINT AT 12, 18; "<95V 

508 CLS 


250 

;C-1 

PRINT AT 13,20;"GOES LEFT-" 

510 RUN 
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T HE SEARCH for a Space Invad- 
ers-type game with all the fea¬ 
tures of the arcade version 
continues. The major problem remains 
one of speed. Timothy Shaw of Nor¬ 
wich, Norfolk has overcome that to 
some- extent by some clever lateral 
thinking. The invaders in the sky are 
unaggressive and do not shoot. Directly 
above you, though, is a giant centipede 
which shoots to defend the invaders. 

Because of its proximity it is far more 
difficult to avoid the centipede’s shots 
than it would be to avoid the shots of 
the more distant invaders (16K Spec¬ 


trum). 



15 CLS PAPER 0 INK 7 8URDE 

405 PRINT INK 4; 

AT 21,0;"LIVES 

720 IF x>7 THEN LET x-6 

R 1= CLS 

d d d” 



730 IF *>7 THEN LET v-6 

J0 LET hs-0 

4I3TET x-6 LET 

»=6- LET z-6 

.740 IF 7>7 THEN LET r=6 

40 CLS PAPER 0- INK 7 HORDE 

412 LET h-20 



750 PRINT INK 5; PAPER 2;AT 20, 

R 1 - CLS 

415 DIM x*<3,h> 




50 CaO SUB 5050 




760 GO TO 470 

50 LET c-0 

420 LET x*<1 >«" 

ii * 

a a a a. 

2000 PRINT INK 2; PAPER 0;AT 16, 

100 LET 1=3 

* a " 




150 CLS 

430 LET x*<2>»" 

b b b 

b b b b 


300 LET s=0 

b b " 



2U05 PRINT AT 16,26; INK 5; PAPE 

205 RESTORE 260 

440 LET x*<3>«" 

c c c 

c c c c 


210 FOR r»l TO 8 

c c " 



2007 PRINT AT 16,0; INK 5;"99999 

220 READ d* 

470 ir h<0 THEN 

-ET h*. 


9” 

230 FOR u=0 TO 7 

500 PRINT INK 4; 

PAPER 

0; BRIGH 

2010 LET c-c+1- BEEP .001,28 IF 

240 READ .3 POKE USR d*+u,a NE 

T 1,AT l, x; x*< 1 , 2 

TO h) 


c>25 THEN LET c«6 

XT u 

520 PRINT INK 2; 

PAPER 

0; BRIGH 

2020 LET d-INT < RND*3 > 

250 NEXT r 

T 1,AT 3,*;x*<2,2 

TO h :> 


2025 INK 7 

260 DATA "*"<231,36,126,126,126 

540 PRINT INK 6; 

PAPER 

0; BRIGH 

2030 IF d<>0 THEN GO TO 3000 

, 126,36,231 

T 1,AT 5, z ; x*< 3,2 

TO h > 


2040 PLOT OVER 1 ; c*8+32,39 - DRAW 

270 DATA "b",8,85,127,55,62,28, 

560 IF K=Q THEN 

PRINT 

AT 21,6; 

OVER 1;0,-25' BEEP .009,30- PLO 

34,65 

. GO TO 9O00 



T OVER 1;c*6+8,39- DRAW OVER 1;0 


600 PRINT INK 6; 

PAPER 

0;AT 20, 

,-25' PLOT OVER 1;c*8+32,39■ DRA 

280 DATA "c",60,102,102,219,213 

a;" d " 



W OVER 1;0,-25' PLOT OVER l;c*0+ 

,126,90,129 

640 IF INKEY*="'l 

' THEN 

GO TO 70 

8,39' DRAW OVER 1;0,-25 

298 DATA "d",0,0,24,60,126,255, 

00 



2050 PRINT INK 4, PAPER 0;AT 16, 

255,255 

650 IF INKEY*-" 

" THEN 

GO SUB 5 

c; " f f f © " 

300 DATA "©",0,24,60,90,153,153 

000 



2055 _ P^INT AT 16,26; INK 5; PAPE 

,255,90 




R 0;"999999" 

310 DATA "f",0,24,60,126,255,25 

660 IF INKEY*-"a 

' AND a>2 THEN 

2060 IF c>25 THEN LET c-0 

5,66,66 

LET a-a-1 




320 DATA "9",0,85,255,251,251,0 

665 IF lNKEY*="d' 

' AND *<27 THEN 

2070 IF CODE SCREEN* <20,c+4X>3 

, 223t223 

LET *=a+l 



2 THEN GO SUB 8000' GO TO 3000 

330 DATA "h",129,8,33,4,80,4,16 

670 PRINT INK 6; 

PAPER 

0;AT 20, 

2080 IF CODE SCREEN* <20,c+l><>3 

O, 9 

a;" d " 



2 THEN GO SUB 8000- GO TO 3000 

40O LET *=15 

680 GO SUB 2000 



3010 RETURN 

402 PRINT INK 0; PAPER 3jAT 0,2 

690 LET 9-1NT < RND*3)■ 

IF 9-0 T 

5800 IF SCREEN* <16,a+1)="" THEN 

2;"HIGH »;hs 

HEN LET x=x+l 



GO TO 5100 

403 PRINT AT 0,0; INK 0; PAPER 

700 IF 9*1 THEN LET 

♦ 1 

5010 PLOT OVER 1; a*8«-12,16 ' DRAW 

3;"SCORE " 

710 ir 9=2 THEN LET z-z+I 

OVER 1;0,150' BEEP .02,48 PLOT 
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OVER 1;4*8+12,16' DRAW OVER 1)0 
,150 

5020 IF CODE SCREEN* <5,4+1)032 
THEN LET s=s+10 LET h-h-2' GO 
TO 50*50 

5020 IF CODE SCREEN* <3,4+1)032 
THEN LET s«s+20 LET h-h-2’ GO 
TO 506O 

5040 IF CODE SCREEN* <1,4+1)032 
THEN LET s=s+30' LET h=h-2- GO 
TO 5070 

5042 FOR i=l TO 30' NEXT i 
5045 RETURN 

5050 PRINT INK 7;AT 5,a+l;"h" B 
EEP .2,7 PRINT PAPER 0;AT 5,4+1 
t" "■ GO TO 5030 

506O PRINT INK 7; AT S^ + li'-JV' B 
EEP .2,7 PRINT PAPER 0;AT 3,4+1 


;" " GO TO 50eO 

5070 PRINT INK 7;AT l,a+l;"h"’ B 
EEP .2,7 PRINT INK 7> PAPElT0>A 
T 1,4+1j" " GO TO 508O 
5088 PRINT INK O; PAPER 3; AT 0,0 
)"SCORE ";s 
5O90 RETURN 

5100 PLOT OVER 1;4*8+12,16' DRAW 
OVER 1j 0,24• BEEP .01,-15- PLOT 
OVER 1;4*8+12,16' DRAW OVER 1;0 

,24 

5110 PRINT INK 6;AT 10,8;"HIT BA 
RRIER"' BEEP .01,35' PRINT AT 10 
,8;" "• RETURN 

7000 FOR b-0 TO 31 
7O10 IF CODE SCREEN* <l,b)-0 THE 
N GO TO 450 

7012 IF CODE SCREEN* <3,b>=8 THE 


N GO TO 450 

702G IF CODE SCREEN* <5,b)-0 THE 

N GO TO 450 

7022 NEXT b 

7025 PRINT AT 10,0;" 

7030 PRINT FLASH 1;AT 10,0;"**** 
***BONUS*END*OF*SHEET*******" 
7033 BEEP .5,10' BEEP .5,-7' BEE 
P 2,35 

7035 PRINT AT 10,0;" 

7037 IF 1-3 THEN LET s«s+100 

7038 IF 1-2 THEN LET s-s+75 

7039 IF 1-1 THEN LET s=s+50 

7040 PRINT INK 0> PAPER 3;AT 0,0 
;"SCORE' ";s' GO TO 410 

8000 FOR 9=1 TO 5- PRINT INK 9;A 
T 20,4+1;"d" BEEP .1,9*2' NEXT 
9- LET l»P!< PRINT INK 3;AT 21, 
1+7;" "• BEEP .5,10- BEEP .2,-1 

O' BEEP .5,35 RETURN 
9008 PRINT FLASH 1;AT 1O,0;"***A 
LL*L I VES*LOST*ENL-*OF*GAME*** " 
9005 IF s>h* THEN LET hs-a 
9O07 PRINT INK O; PAPER 3;AT 0,2’ 
2;"HIGH ";ha 

9018 BEEP .5,0 BEEP .3,0' BEEP 
.5,10 

9020 INPUT "PRESS ENTER FOR ANOT 
HER GAME"; LINE z* 

9030 CLS GO TO 40 

9O50 PRINT AT 0,8; INK 0; PAPER 

4;" SPECTRUM INVADERS 

9060 PRINT '"In thia version of 
aPaceinvadera"'' " you must dest 
roy the invaders"''" but watch o 
u.t- for the movino"''" centipede 
with its double lazer"''"The inv 
aders sometimes disappear"''" to 
o so destroy them fast "''"These 
are the keys'"'" R-to move th 
e base left"'" D-to move the b 
ase right""" SPACE-fire Q 

-New sheet” 

9065 PRINT FLASH 1;AT 21,18;"GOO 
D LUCK I I" 

9070 INPUT "Press enter to Play" 

; LINE z* 

9073 RETURN 



L AND YOUR small aircraft on an 
aircraft carrier in the Atlantic. 
To do it successfully you must 
bear in mind that your fuel is running 
out rapidly, your airspeed increases 
with your level and the number of times 
you land, and that the ship below you is 
also moving. Move upwards with key 
“6”, and down with key “7”. 

Atlantic Lander runs on the IK 
ZX-81 and was written by A Powell and 
T Goodhand of Bracknell, Berkshire. 


ATLANTIC LANDER 
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FALL THROUGH 


D 1 FAST 
2 CLS 

5 DIM S< 2 > 

10 DIM A*<8,10:> 

15 DIM A<8> 

20 DIM D*<0,10> 

21 DIM M<2,8,8> 

25 DIM D<8> 

20 FOR N-l TO 8 
40 FOR H»1 TO 5 

66 LET A*<N,2*H-INT <RND>.5>>» 
"<isP )" 

65 LET D*(N>2*H-<RND>.5>>“"<is 
P >" 

70 NEXT H 

ri LET H-2+INT <RND*10> 

72 LET A*< N )=A*< N/H TO >+RSKN, 

1 TO H-l> 

78 LET H=2+INT <RND*10> 

74 LET D*<N>-D*<N,H TO >+D*<N, 
l TO H-l> 

75 LET A<N>-INT <RND*3> 

76 LET D<NWNT <RND*3> 

80 NEXT N 

20 SLOW 

100 FOR N~1 TO 8 
110 PRINT AT 2*N,4j 
120 FOP M»1 TO 0 
130 PRINT "< isP •'•+CHR* <128#<A» 
<N,M>™" " j+ 131*<D*<M>N>*" " AND 
n*<N,M>»"< ISP )" >>; 

140 NEXT M 

141 FOR D-0 TO A< N > 

142 PRINT "<isP SPV'j 
142 NEXT D 

150 FOR D-l TO D< N '> 

151 PRINT AT 102*D,2*N+3; "< i*P 

152 NEXT D 
160 NEXT N 
170 LET 3< 1 >-8 
180 LET S<2>*8 
2O0 FOR M=1 TO e 
218 FOR P^l TO 2 
220 LET X=1 

230 LET Y=1 

270 PRINT AT 2*Y-1,2+2TX;CHR® < 
23+i2G*<M<1, X, Y ><>M< 2,X, Y > > > 

2e0 COSUD 2500 
305 IF 0-11 THEN GOTO 390 
307 PRINT AT 2*Y-1,3+2*XiCHR* < 
307 PRINT AT 2*Y-l,3+2*X;f_HR® < 
28*<M< 1,X,Y V >M<2,X.Y>>+M< 1,X,Y> 
+Mt 2/X/Y)> 

310 LET Y»Y-<D*0H<D-2> 

320 IF Y<1 THEN LET Y-l 
330 IF Y>8 THEN LET Y-8 
340 LET X*X+< D*6 >-< DM) 

350 IF X<1 THEN LET X*»l 
360 IF X>8 THEN LET X~8 
870 GOTO 270 

390 IF D*< X< Y >+R#< Y* X >*"(2#lsP ) 
" OR M< 1,X,YX>M(2,X,Y> THEN GOT 
0 280 

40O PRINT AT 2*Y-1,3+2*X;P 

405 LET MCP,X,Y>P 

410 NEXT P 

420 NEXT M 

500 LET X-0 

510 LET Y-0 

520 LET P-1+<P-1> 

530 PRINT AT 2*Y.3+2*Xj 

540 GOSUB 2508 

565 PRINT AT 2#Y,^+2*XJ•' " 

570 IF < ( D“2 OR D-8> AND X> OR 
<<D-4 OR D“6AND Y> THEN GOTO 7 
00 

580 LET Y«Y-KD“2>*<Y<8>-<D«8>*< 
Y>0 ) 

590 LET X-X+<D-6>*<X<8>-<D-4>*< 
X>0> 


A BOARD is displayed, compris¬ 
ing horizontal and vertical 
strips, each with several holes 
in it. Each strip can be moved to three 
positions and the markings at the bot¬ 
tom and right-hand side indicate where 
they start. 

If a horizontal strip has a hole in the 
play area it is shown as a gap in the line. 
If a vertical strip has a hole in the play 
area it is visible only when it coincides 
with a hole in the vertical strip, in 
which case it appears as a hole. 

The game begins with the two play¬ 
ers taking turns to set their numbers on 
the board. Player one moves the cursor 
with keys 2,Q,W and A and sets a 
number with Z. Player two moves the 
cursor with 0, 0,P and L and sets a 


number with. When each player has set 
eight numbers the cursor will move to a 
slightly higher position on the screen. 
Players must then take turns to choose a 
strip to move. The cursor then moves 
along the left and top of the board, so 
that a control key in line with the edge 
will move the cursor, and a control key 
in line with a strip will move that strip, 
line with a strip will move that strip. 

When the strips are moved so that a 
number stands on a hole it will fall 
through and vanish. The object of the 
game is to remove all your opponent’s 
numbers. 

Fall Through was written for the 
16K ZX-81 by R Entwistle a nd so n of 
Cheltenham. 
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A STRING of random characters is 
printed at the top of the screen 
and one of them also appears at 
the bottom. Using the keys “Q”—left, 
“E”—right, and “P”—fire, you must 
shoot the character from the string at 
the top. 

Your time to achieve that is limited 


and decreases after each shot. When the 
inverse “X” reaches the right of the 
screen your time has expired. The game 
ends when you miss for the third time. 

Alpha Attack was written for the 
16K Spectrum by Laurence Wood of 
Northampton. 


9 PRINT AT 10,10; "Aw key"- P 
AIJSE 0 

10 LET s-40 LET J-2■ LET m=0' 
LET s-0- LET 1*13 
20 CLS 

30 BORDER 6' PAPER 7- INK 1 
40 CLS ■ IF m»3 THEN GO TO 500 
50 FOR f-3 TO 25 
60 PRINT AT 3,f;CHR* CCRND*100 
>■*•27) 

70 NEXT f 
75 LET y-y +2 
80 GO TO 100 
90 FOR t-y TO 108 
100 IF t>70 THEN PRINT AT 5,t-7 
0J "C sP • lx> " 

110 BEEP .009,t-40 

120 PRINT AT 20-1;"C sP■196- it - 9 

6 sP )" - 

"T5U LET l-l+C INKEY*-"e")-CINKEY 
*-"4" >+C 1-0 >-C 1-2B) 

140 IF INKEY*-"P" THEN BEEP .00 
5,10' BEEP .007,3' GO TO 220 
150 NEXT t 
160 BEEP 1,-50 


170 LET m-m+1> GO TO 40 
180 LET a*-SCREEN* <3,INT CRND* 
20 )+3 ) 

190 PRINT AT 0,22;"SCORE- A 
T 0,0;"Misses■ "jn 
200 PRINT AT INT CRND#10>+10,IN 
T CRND*30>;«* 

210 GO TO 90 

220 FOR z-19 TO 4 STEP -1< PR1N 
T AT z,1+2;■ NEXT z 
230 IF SCREEN* <3, l+2X>a* THEN 
BEEP .2,-30' BEEP .2,-60- LET m 
-m+1■ GO TO 40 
240 LET s-s+1 

250 BEEP .01,10 BEEP .01,20 
260 GO TO 40 

500 BEEP .7,-30' BEEP .7,-60' C 
LS 

510 PRINT AT 10,9' FLASH 1;" Th 
ird miss ! "; FLASH 0;AT 2,11;"S 
core - "is; AT 10,5; "Aw key to P 
Jl94iT>" 

520 PAUSE 0 
530 GO TO 10 


VVKJ WIU ^-3 

700 IF NOT X THEN GOTO 704 
781 IF CD-2 AND DCX>-2> OR <D-e 
AND DC X >-0 ) THEN GOTO 530 

704 Ik NOT Y THEN GOTO 710 

705 IF CD-4 AND A<Y>«0) OR CD-6 
AND AC Y )-2) THEN GOTO 530 

710 IF D< >2 THEN GOTO 750 
720 LET D*CX)-D»CX, 10>+D*CX, 1 T 
0 9) 

730 LET DC X>-DC X)+1 
740 GOTO 80O 

750 IF DC>8 THEN GOTO 900 
760 LET D#C X>-D*C X,2 TO )+D*CX, 
1 ) 

770 LET DCX:«D<X)-1 

600 FOR N-l TO 2 

818 PRINT AT 2*N+16,2*X+3;CHR* 

C128*C NC-DC X))) 

020 NEXT N 
830 FOR N=1 TO 8 
840 PRINT AT 2*N,3+2*X;CHR* C12 
8*CA*CN,X)-" " >+131*CD*<X,N)-" " 
AND A*CN,X)-*’C isP >" )>; 

850 IF D#C X, N)-" " OR A*CN,X>-" 
" THEN GOTO 060 

859 IF NOT MC1,X,N) THEN GOTO 8 
65 

060 LET SC 1>*SC1>-l 
661 LET MC1,X,N)-0 
065 IF NOT MC2,X,N) THEN GOTO 8 
70 

866 LET MC 2,X,N )-0 

867 LET SC 2 )-SC 2)-l 

870 PRINT AT 2*N-1,3+2*X;" " 

800 NEXT N 
890 GOTO 2000 
900 IF DOS THEN GOTO 950 
920 LET R*CY)-A*C Y, 10)+A*CY, 1 T 
0 9) 

930 LET AC Y >-AC Y >+l 
940 GOTO 1000 

950 IF DC>4 THEN GOTO 2000 
960 LET A*CY)-A*CY,2 TO >+A*CY, 
1 ) 

970 LET AC Y)-AC Y)-l 
1000 FOR N-l TO 2 
1010 PRINT AT 2*Y,2*N+20;CHR* Cl 
28*C NC-ACY))) 

1020 NEXT N 
1030 FOR N-l TO 8 
1040 PRINT AT 2*Y,3+2*N;CHR* C12 
8*CA*CY,N>-" " >+131*CD*CN,Y>-" " 
AND A*C Y,N)-"C isP )" )>; 

1050 IF D*C N, Y )-" " OR A*CY,N)-" 
" THEN GOTO 1080 

1060 IF NOT MC1,N,Y) THEN GOTO 1 


REPLAY" 

2850 INPUT K* 

2060 RUN 

2500 LET K*-INKEY* 

2510 IF p-l THEN LET D«2*CK*="R" 
>+4*CK*=-"G" >+6*CK*-"W" >+0#CK.*-"2 
">+ll*< 

2520 IF P-2 THEN LET D=2*CK*-»L" 
-+4YC K*-"0">+6*CK*-"P">+8*CK*-"0 
">+ll*CK*- M .") 

2520 IF NOT D THEN GOTO 2500 
2540 RETURN 
<006 CLEAR 

3010 SAVE "FAIL THROUCh" 

3020 RUN 
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100 REM Define UraPhics 
105 RESTURt 14Ud CC 
110 FUR n-144 Tu 143' FUR m^U T 
U 7 c c d c c 

120 READ a PUKE USR OHRS n+m,a 
l i0 NEXT m NEXT n 
140 DATA 0,0,63,120,255,255,126 
,0 

150 DATA 0,0,252,30,255,255,126 


160 OATH 16,56,84,bb,84,1G6,16, 
16 

170 DATA 0,0,0,24,24,0,0,0 
180 DATA 0,0,56,0,0,0,0,0 
190 DATA 137,82,44,90,189,44,S2 
,137 

200 REM Set-uP Game 

210 BORDER 0 PAPER O- INK 6- U 

LS 

220 PRINT AT 0,4;"a TAN K 
DUEL b" • PRINT 
230 PRINT TAB 9; "<£ T. COLLINS"' 
PRINT 

240 PRINT TAB 6;"GENERAL INSTRU 
CTIUNS" PRINT 

250 PRINT " A 9*me for two Aj 
yer», try fcoshoot your opponent* 
tank fir*t. " 

260 PRINT " Avoid tank obstacl 
e* L □ whichcan be *hot" 

270 PRINT " Tree* LcJ are bar* 
les* but canblock shot*." 

280 PRINT " Avoid mine* LdJ uh 
ich cannot be shot." 

290 PRINT TAB 12;"CONTROLS"* PR 
I NT 


300 PRINT " Player 1";TAB 23; "P 
layer 2" 

310 PRINT "1-5 Move up";TAB 21; 
"6-0 ! Move uP" 

320 PRINT "Q-T•Move down”;TAB 1 
9;"Y-P'Move down" 

330 PRINT "Bottom row■Fire";TAB 
17/"Bottom row’Fire" 

340 FOR c-7 TO 1 STEP -1 
350 PRINT INK c;AT 0,8;"T A N K 
DUEL" 

352 PRINT INVERSE 1; INK c;AT 2 
1,9;" PUSH ANY KEY " 

355 IF c*7 THEN PAUSE 10 

360 IF INKEYSK >"" THEN CO TO 40 

0 

365 PAUSE 5 
370 NEXT c 
380 CU TO 340 

400 BORDER ?■ PAPER 4 INK L t 
LS 

410 INPUT "HOW MANY TANKS FOR P 
LAYER 1? ";tl IF tl>99 THEN GO 
TO 410 

420 INPUT "HOW MANY TANKS FOR P 
LAYER 2? ";t2■ IF t2>99 THEN GO 
TO 420 

430 PRINT INK 0; PAPER 7)"TANKS 
LEFT' ">tl;TA8 16;" TANKS LEFT> 
" ; t-2; TAB 31;" " 

440 PRINT INK 0; PAPER 7;AT 21, 
0;"SHOTS LEFT 5";TAB 16;"SHOTS 
LEFT' 5"; TAB 3D" " 

450 FUR n*5 TO 24 STEP 19' FOR 
m-2 TO 19 

460 IF RND>. 3 THEN GO TO 490 


470 LET o=INT <RND*3+n> 

480 PRINT INK 0;AT m,o;CHR* 143 
;AT m-l,o;CHR» INT <RND*4+140>;A 
T m+l,o;CHR* INT (RND*2+13B>;AT 
m,o-l;CHR* INT <RND*2+140>;AT m, 
o+DCHR* INT <RND#3+13B> 

490 NEXT m NEXT n 
500 FOR n-9 TO 18 STEP 9 FOR m 
• 1 TO 20' FOR o-n TO n+4 
510 IF RND<.3 THEN PRINT INK 7; 
AT m,o;CHR* 146 
520 NEXT o- NEXT m' NEXT n 
530 FOR n-1 TO 20 FOR m=14 TO 
17 

540 IF RND<.3 THEN PRINT INK 2) 
AT n,m;CHRS 147 
550 NEXT m NEXT n 
560 LET k=0 
600 REM New Tank* 

605 FOR n-1 TO 100 NEXT n 
610 LET sl-5' LET *2-5 
615 PRINT INK 0; PAPER 7;AT 21, 
0;"SHOTS LEFT 5";TAB 16;"SHOTS 
LEFT- 5";TAB 3D" " 

620 LET a*INT < RND*19+1)■ LET b 
■1 

630 LET c-INT <RND*19-HV LET d 
-30 

64Q PRINT INK DAT a,b;CHR* 144 
;AT c,d;CHR* 145 
650 BEEP .25,-10- BEEP .5,-5 P 
ROSE 10' BEEP .25,-10 BEEP .5,- 
5 

1000 REM Plaaer 1 Move 

1005 IF k=l THEN LET k*0- GO TO 

7O00 


TANK DUEL 


W E ARE BECOMING increas¬ 
ingly surprised and delighted 
at the quality of listings emerg¬ 
ing as Spectrum owners become more 
and more skilful in the use of their 
machines. Tank Duel is yet another 
excellent listing to set alongside several 
others in this issue. It requires skill, 
luck and speed and is played on a 
stylised but convincing battleground. 


Full instructions are given with the 
program but briefly the game requires 
two players to control a series of tanks 
travelling across varied terrain towards 
the final showdown. 

Three types of obstacle are encoun¬ 
tered — tank traps which can disable 
your vehicle but which can be blasted 
away; trees which can be pushed over 
but which will block your shells; and 


mines which can neither be pushed over 
nor destroyed by gunfire but which will 
not impede your shooting. The game 
was sent by A R P Collins of Enfield, 
Middlesex. (16K Spectrum). 

Graphics notes: 

220—Graphic A, graphic B 
260—Graphic shifted 1 
270—Graphic C 
280—Graphic D. 
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1010 LET al-a< LET bl-b 
1020 LET al~a+< IN 645100255 AND 
a<20>-(lN 634060235 FIND a~>l > 
1030 IF RND<. 2b THEN LET bl-b+1 
1040 IF ATTR <4l,blK>33 THEN GO 
SUB 3O00 

1045 IF al-c AND bl”d THEN PRINT 
AT a,b; M "> FLASH 1; INK 2; PAP 
ER 6;AT al,bl;CHR* 149’ GO TU 21 
00 

1050 PRINT AT a,b;" ";AT al,bl;C 

HR* 144 

1060 LET a«al- LET b»bl 

1070 IF k«l THEN LET k-0- GO TO 

7000 

1080 IF < IN 652780253) AND sl>0 
AND b<d THEN GO SUB 5O0O 
2000 REM Planer 2 Move 
2005 IF k-1 THEN LET k-0 GO TO 
8000 

2010 LET cl-c LET dl=d 
2020 LET cl»c+< IN 573420255 AND 
c<20 >-< IN 614380233 AND c>l > 
2030 IF RND<.25 THEN LET dl^d-1 
2040 IF ATTR <cl,d1)033 THEN GO 
SUB 4000 

2045 IF cl-a AND dl-b THEN PRINT 
AT c,d;" FLASH 1; INK 2; PAP 
ER 6;AT cl,dl;CHR* 149- GO TO 21 
08 

2050 PRINT AT c,d;" ";AT cl,dl;C 
HR* 145 

2060 LET c—c1 LET d=dl 

2070 IF k=l THEN LET k-8’ GO TO 

9000 

2090 IF < IN 327660255) AND *2>0 
AND d>b THEN GO SUB 6000 
2090 IF b<d+4 THEN GO TO 1000 
2100 PRINT FLASH 1; INK 0; PAPER 
7;AT 21,0;" DRAW 

2105 FOR rv*-10 TO -20 STEP -1 B 

EEP . l,rv NEXT tv BEEP 1,-20 

2110 PRINT AT a,b;" ";AT c,d;" " 

2130 GO TO 600 

3080 REM Planer l Checks 

3010 IF ATTR <al,bl><39 THEN BEE 

P .1,-20’ RETURN 


3020 LET k-1 RETURN 

4000 REM Planer 2 Checks 

4010 IF ATTR <cl,dl>-39 THEN BEE 

P .1,-20 RETURN 

4020 LET k-1 RETURN 

5000 REM Planer 1 Fire 

5001 BEEP .1,-38 

5O05 LET sl^sl-l nPiNT INK 0. P 
APER 7;AT 21,12;si 
5007 IF si— 1 THEN PRINT OVER 1; 
FLASH 1; INK 0; PAPER 7;AT 21,12 
l” “- BEEP .1,60 BEEP .1,40 
5010 LET ma-b PRINT OVER 1; INK 
8;AT a, ma;CHR® 148 
5820 LET ma1-ma+l 
5030 PRINT OVER 1; INK 8;AT a,mn 
,CHR* 148;AT a,Mn1;CHR* 148 
5O40 IF ATTR <a,mal>«3£ OR ATTR 
c a,mn1>-29 OR mnl-d THEN GO TO 5 
060 

5050 LET ma-mal’ GO TO 5020 
5060 PRINT FLASH 1; INK 2; PAPER 
6;AT a,Mai;CHR* 149 DEEP .05,2 
0’ BEEP .1,-10’ PRINT AT a,mnl;“ 

5070 IF a-e AND mnl-d THEN GO SU 
B 8000 
5080 RETURN 

6000 REM Plaaer 2 Fire 

6001 BEEP .1,-30 

6085 LET S2-S2-1 .PRINT INK 0; P 
APER 7;AT 21,28;s2 
6807 IF s2-l THEN PRINT OVER 1; 
TLASH 1; INK O; PAPER 7;AT 21,28 
;" »• BEEP .1,60- DEEP .1.40 
6010 LET ma-d PRINT OVER 1; INK 
8;AT c,ma;CHR* 148 
6020 LET mal-ma-1 
6030 PRINT OVER 1; INK 8; AT own 
;CHR* 148;AT c,maljCHR* 140 
6040 IF ATTR <c,ma1 >-32 OR ATTR 
< c,ma 1 )-39 OR mal-b THEN GO TO 6 
060 

6850 LET Ma-mal GO TO 602O 
6060 PRINT FLASH 1, INK 2; PAPER 
6;AT c,ma1;CHR* 149’ BEEP .05,2 
0 BEEP .1,-10 PRINT AT c.ma1;" 


6070 IF c-a AMD mal-b THEN GO SU 
B 7000 
6080 RETURN 

7000 REM Death of Planer 1 
7005 PRINT FLASH 1; INK 2; PAPER 
6;AT a,b;CHR* 149 
7010 LET tl-tl-l PRINT INK 0; P 
APER 7;AT 0,12;tl;" » 

7015 IF tl = l THEN PRINT OVER 1; 
FLASH 1; INK 0; PAPER 7;AT 0,12; 
" "• BEEP .1,60’ BEEP .1,48 
7020 FOR rt-0 TO -10 STEP -1 BEE 
P .1,n' NEXT rv BEEP 1,-20 
7030 PRINT AT a,b;" ";AT c,d;" " 
7040 IF tl>0 THEN GO TO 600 
7050 LET w«2- GO TO 9088 
8000 REM Death of Planer 2 
8005 PRINT FLASH 1; INK 2; PAPER 
6;AT c,d;CHR* 149 
8010 LET t2»t2-l PRINT INK 0; P 
APER 7;AT 0,29;t2;" " 

9015 IF t2-l THEN PRINT OVER 1; 
FLASH 1; INK 0; PAPER 7;AT 0,29; 
M "< BEEP .1,60’ BEEP .1,40 
8020 FOR rt-0 TO -10 STEP -1 > BEE 
P . 1, tv NEXT r. * BEEP 1, -20 
8030 PRINT AT c,d;" ";AT a,b;" " 
8040 IF t2>0 THEN GO TO 600 
8050 LET w»l- GO TO 9000 
9000 REM Wi titter 
9010 PRINT FLASH 1; INK 2; PAPER 
6;AT 9,10;" GAME OVER ":AT !1, 
9;" PLAYER ";w;" WIN " 

9900 REM Atiother Game? 

9920 PRINT FLASH 1; INK 0; PAPER 
7;AT 21,0;" ANOTHER GAME? PRESS 
' Y' OR 'N' " 

9930 IF INKEY*-"Y" OR INKEY*-"n” 
THEN GO TO 200 

9940 IF INKEY*-"N" OR INKLY*-"n" 
THEN GO TO 9960 
9950 GO TO 9930 

9960 BORDER 7 PAPER 7 INK 0’ C 
LS STOP 

9999 SAVE "TANK DUEL" LINE 100 
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The Cheapest Ra mpacks n The World 

" |~~Available Now - 

"sTspectrum 

32K RAMPACK 


Simply plugs into user port at rear 

of computer and increases your 

16K Computer instantly to 48K £39 h95 

• Fully Compatible with all accessories. 

• No need to open computer and invalidate guarantee. 

• Why send your computer away and wait weeks for upgrade, 

• Fully cased, tested and guaranteed. 


ZX81 16K RAMPACK .£19.75 

ZX81 64K RAMPACK .£44.75 


Now make your Spectrum talk! 

The Cheetah “Sweet Talker” just plugs into the back of the computer using the existing 
power supply. Fully cased. Easy to program any word, sentence or phrase. 
Simply incredible at £34.95 

All Units: Fully Cased and Guaranteed. Secure No Wobble Design. 

Fully Compatible with all accessories. 


PRICES INCLUDE VAT and P&P. Delivery normally 14 days. 
Export orders at no extra cost. 


Send cheque/P.0. Payable to:— 

Dept SU 

CHEETAH 

MARKETING LTD 
359 THE STRAND 
LONDON WC2R OHS 
Tel: 01-240 7939 
Telex: 8954958 

16K ZX 81 Rampacks and 32K ZX Spectrum 
Rampacks now available at larger branches of 
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The Challenge of the Decade! With 
NEW Games like CONFLICT 
and GALAXY CONFLICT 

We’re adding the latest and best to our catalogue every month from selected sources 
throughout the UK and North America - so there's a new challenge for you every time at 
prices you won’t beat! 

Remember - we specialise in programs for your Sinclair - whether you choose games, 
business, educational or household software. Many of our games cannot be bought by mail 
order from any other source. And many of our prices are the lowest you’ll find anywhere. 

You'll want to make sure victory is yours with these new programs where two can play: 

CONFUCT - Total war for two players, involving both the machinery [armies, missiles, 
warships) and finance [stock market, oil, piracy) of conflict. 

To order quote the following references: - ZX81 -16k: C-1; Spectrum-48k: C-2. 

GALAXY CONFLICT - Raise the fleet of battle Eoncruisers then move from bridge 
to bridge taking full control and responsibility in this battle for the heavens - to prove 
yourself a born galactic ruler! 

To order quote the following references: ZX81 -1 Bk: GC-1; Spectrum-48k; GC-2. 

Each comes complete with game board, program, counters, markers, maps [CONFLICT only] 
plus full instructions and rules of war for the unbeatable introductory price of £9.95! 

(N.B. When ordering be sure to specify the correct order number, dependent upon the type of J 
machine - ZX81 or Spectrum - that you own.) 

With our Special deal you can't go wrong: 

★ FREE offer every time [this time it’s a free blank C20 cassette with every two programs I 
ordered) 

★ A replacement guarantee if you're not entirely satisfied with the quality of your purchase J 
- that’s how confident we are! 

All you have to do is look at our new HOT selection - then order quickly to benefit from the 
introductory prices of our new games of skill, intelligence and excitement (fast delivery is 
another of our specialities - so you could be using these new programs SOON] 


FREE BLANK C20 COMPUTER CASSETTE 
WITH EVERY TWO CASSETTES YOU ORDER! 

Remember there’s no limit to the number of free 
cassettes you receive if your order justifies them — s 
why not get together with friends or user group 
members and share the fre ebies? 

guarantee 

Order with complete j^Sj^JJ^quafity of 
not entirely £11! within 7 

vour purchase - return re 


and a 

replacement 


GREAT VALUE! TREMENDOUS SELECTION! PLUS A FREE J 
OFFER EVERY TIME! 

Rll in the order form right away — we’re guaranteeing fast 
delivery, quality and satisfaction [after all, we want you to 
come back for more!] 

The Software Workshop, Yew Tree, Selborne, 

Hants GU34 3JP 


it’n » «»' 51 








To: The Software Workshop, Yew Tree, Selborne, Hants GU34 3 Jp"| 

I wish to order the following programs. I understand that: 1 

* I will receive a FREE blank cassette with every 2 programs ordered 

* I can return products within seven days if not entirely satisfied and ■ 

receive a replacement. 1 


Price 


Ref No 


Title 


Postage, packing and handling: add 45p for the 
first cassette, and 25p for each additional 
cassette. Non-UK orders add extra 50% 

I enclose a cheque/postal order for_ 

Name___ 

Address_ 


Total 


[Allow 28 days MAXIMUM FOR DELIVERY] 


Here’s a whole NEW selection of 

the latest games, the best-value software 

for your ZX-81 or Spectrum. 


£3.95 

£3.95 

£3.95 

£4.95 

£4.95 

£4.95 

£5.95 

£4.95 

£4.95 


2-14 Meteor Storm 

Spectrum version of the ever-popular 
arcade game 16K or 48K RAM 

2-15 Star Trek 

Popular space program brought to life by 
excellent graphics. 48K RAM 

2-21 Frogger 

Manoeuvre the frog across the road 
avoiding heavy traffic 48K RAM 

2-22 Crazy Balloons 

Guide the balloons round the maze 
without bursting. 48K RAM 

2-23 Arcadia 

The expert's version of the papular 
Invaders' game. 16K or 48K RAM 

2-24 Golf 

The finest of golf handicap games. 

48K RAM 

2-25 Test Match 

More exciting than the real thing! 

4BK RAM 

2-26 Derby Day 

This favourite has to be a winner 
48K RAM 

2-27 Rescue 

Rescue the Princess from marauding 
patrols. 48K RAM 

2-28 The Orb 

Discover the Orb in the depths of the 
temple but watch the monsters. 

48K RAM 

2-29 Jackpot 

The harmless way to take on the one- 
armed bandit. 48K RAM 

2-31 Football Manager 

See 1 -21 under ZX81.48K RAM 


£4.95 

£4.95 

£5.95 

£5.95 

£5.95 

£5.95 

£5.95 

£5.95 

£5.95 

£5.95 

£5.95 

£6.95 


ZX81 Software 


1-01 Stock Market 

Buy and sell your way to millions! 

16K RAM 

1 -02 Football League 

First division fun for the soccer 
enthusiast. 16K RAM 

1 -03 Test Match 

Match your wits alongside the 
superstars. 16K RAM 

1-11 Arcade Action 

Overtaker/Missile Man/Space Fighter/ 
Pilot/Greedy Gobbler/Extra Terrestrial. 
IK 

1-12 Avenger 

Avoid missiles and bombs to become the 
ruler 16K RAM 

1-13 Protector 

Defend your own ship from oncoming 
attackers 16K RAM 

1 21 Football Manager 

Manage your team through a hectic 
league season! 16K RAM 


Spectrum Software 

2-12 Avenger 

(See 1-12 under ZX81J 48K RAM 

2-13 Sentinel 

Guard your mother ship against alien 
attacks. 48K RAM 


























Now you can take a new 


AMERICAN look at your Sinclair! 

With the new Timex Sinclair User magazine to link YOU into a 
huge network of American enthusiasts 







The first issue will be published /T I \ \ 

in the U.S.A. in May — 0 1 V\ 

packed with news, reviews, JA I V 

programs and User Club '“'I I I ^ 

information to link you into the vast I “ j \ \ 
American Timex Sinclair user \ 1 

network. V ^ 


Remember, this is a new magazine \ 

written from the American \ 

viewpoint — but it could open up / I 

whole new horizons for you on \l / ' 

your Sinclair enjoyment. Take the 
new. American view by ordering right away and see 
how the U.S.A. welcomed the Sinclair! 

Annual subscription rate is £20. Single copies are £2.00 
each (including P & P). 

Fill in the order form NOW to get the first 
issues of this exciting new magazine. 


The success of the Sinclair ZX80, ZX81 and Spectrum 
in the U.K. has been phenomenal. But in the States the 
Sinclair has been given a real American welcome — 
making the Sinclair range the biggest seller in the 
world! The American ZX8I equivalent: “The Timex 
Sinclair 1000” from the giant Timex organisation, has 
been bought by hundreds of thousands of enthusiasts. 

The success of ‘Sinclair User' magazine in the U.K. 
followed a similar pattern — so now we’re matching 
the U.S.A. enthusiasm with a brand new U.S.A. 
magazine — the Timex Sinclair User ! i 



| Send to: TIMEX SINCLAIR USER, ECC Publications Ltd., 
30-31 Islington Green, London Nl 8BJ 
| Yes, I want to subscribe to TIMEX SINCLAIR USER at the 
| special U.K. rate of £20 for 12 issues delivered to my door. 
Name _ 



y 

rk \ ^>( 



I enclose a cheque/P.O. for £_ 5 

Please charge my credit card 
| Card Name_ Card Number 

I Signature_ Date_ 

N.B. This offer applies to UK subscribers only. Overseas rates a' 


I 










M OVE AROUND the grid 
avoiding the blue squares but 
being sure to cross all the yel¬ 
low squares before leaving by the exit. 
The catch is that all moves must be 
entered in advance. Enter them as 
“F n —forward, “B”—backward, “L”— 
left, “R”—right, and “S” when you 
have entered your moves to start your 
arrow moving. 

Pathway runs on the 16K Spectrum 
and was written by Kevin Macdonald of 
Sheffield. 


40 POKE 23658,8 
50 LET Y-l 
60 LET SC-0 
70 LET J-0 
80 LET PH-18 
90 GO SUB 760 

100 FOR a-IJSR "a" TO USR "D"+7 
110 RERD 4= POKE a,4 NEXT a 
120 DATA BIN 11111111,BIN 10000 
001,BIN 10000001,BIN 10008001,61 
N 18000001,BIN 18000001,BIN 1000 
0001,BIN 11111111 
130 DRTR BIN 00000000,BIN 00010 
00,BIN 000O0100,BIN 01111118 > BIN 
00000100,BIN 0000100O.0.0 
140 DRTR 0,BIN 00010000,BIN 001 
00000,BIN Clllll10,BIN 00180000. 
BIN 00010000,0.0 
150 DRTR 0,BIN 00001000.BIN 000 
01000.BIN 00001000,BIN 00101010, 
BIN 00011100.BIN 00001000.0 
160 FOR b-0 TO 10 
170 PRINT RT B,0; INK 0; BRIGHT 

RRRR" ; BRIGHT 0 
180 NEXT b 

200 FOR R-l TO 80+<X*3*10> 

210 LET fil-INT <RND*18> 

220 LET R2-INT <RND*32> 

230 PRINT RT R1,R2; INK 1; PRPE 
R 1; ". " 

240 NEXT R 

250 FOR R-l TO 3 

260 LET Yl-INT <RND*31>+1 

270 LET Y2-INT <RND*17> 

280 PRINT RT Y2,Y1; PAPER 6i IN 
K 6;"T" 

290 NEXT fl 

295 PRINT RT 0,0; INK 0; PAPER 


300 REM ENTER DIRECTIONS 
310 DIM D®<200,1> 

320 PRINT RT 21,0; FLASH 1;" 

PRESS ENTER TO START 
330 PAUSE 0 
340 PRINT RT 21,0;" 

350 LET PV-INT <RND*31>+1 
360 PRINT RT 18, PV; FLASH 1;"T 
370 PRINT RT 20,0; 

380 FOR R-l TO 200 
390 PAUSE 0 

400 IF INKEY*- M L" OP INKEY*-"S" 
OP INKEY*-"R” OR INKEY*-"F" OR 
INKEY*-"B" THEN GO TO 430 
410 IF INKEY*-" " THEN GO TO 39 


440 LET D*<R>-INKEY* 

450 PRINT INKEY®;- IF R-31 OR R 
-62 OR fl-93 OR R-l24 OR R-l65 TH 
EN PRINT RT 20,0;" 

PRINT RT 20 

.0; 

460 BEEP .05,-10• BEEP .05,10 

470 NEXT fl 

480 LET fll-R 

490 PRINT RT 20,0;" 

500 FOR R-l TO 200 
520 LET PHL-PH' LET PVL-PV 
530 IF fi-fll THEN GO TO 670 
540 IF D*<R>-"F" THEN LET PH-PH 
-1 LET 0®-"f" 

550 IF D*(R)»"R" THEN LET PV-PV 
+1■ LET Q*- "B" 

560 IF D*( fi"5-"L" THEN LET PV-PV 


570 IF D*< R >*"B" THEN LET PH-PH 
+ 1 > LET 0»-"D» 

580 IF SCREEN* <PH,PV>*"." THEN 
LET Y-0 

590 IF SCREEN* <PH,PV>-"T" THEN 
LET SC-SC+1' BEEP .5,40 
680 IF SCREEN* <PH,PV>-" + " AND 
SC-3 THEN GO TO 710 
610 PRINT OVER 1;RT PH,PV;0* 

620 PRINT RT 19,0;D*<R> 

630 PRINT RT PHL,PVL: BRIGHT 1; 
PAPER 7j "fl" 

640 IF Y-0 - THEN GO TO 670 
650 BEEP .03,30- BEEP .03,0- BE 
EP .03,30 
660 NEXT fl 

670 PRINT RT 21,0; FLASH 1; PRP 
ER 6; INK 0;" YOU HAVE CR 

ASHED 

600 BEEP .3,10' BEEP .3,20 

690 IF INKEY*-"" THEN GO TO 670 
708 RUN 

710 PRINT RT 21,0; FLASH 1; INK 
1; PAPER 6;" WELL DO 


720 BEEP .3,30' 
730 IF INKEY*-" 
740 PRINT RT 20 
750 RUN 
760 CLS 
770 PRINT " 

Y NO."' PRINT 
780 PRINT " 1- 

2-HRRD" 1 PRINT " 
790 PAUSE 0 
000 LET X-VRL I 
810 RETURN 


BEEP .3,35 
' THEN GO TO 710 
11;"SCORE-";fl 


ENTER DIFFICULT 
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5 GOTO O0O0 
7 CLS 
10 RAND 
20 LET BS-"" 

30 PRINT "WHAT IS YOUR NAME PL 
EASE?" 

40 INPUT C* 

50 PRINT "WHAT DO YOU WANT TO 
SAY "iC*;"?“ 

60 PRINT 
70 INPUT A* 

75 IF PEEK 16398+2S6*PEEK 1639 
9-PEEK 16396+256TPEEK 16397+693 
THEN CLS 

80 IF A*""" THEN GOTO 70 
05 IF A*<LEN A*X >"." AND ASK L 
EN A* )<>"?" THEN LET A*-A*+"." 

90 PRINT "YOU ! /A* 

100 IF A*< LEN UR ASK LEN 

A*>="?" THEN LET A*=A*< TO LEN 
A*-l > 

105 IF A*-"CHANGE USERS" THEN G 
OTO 7 

110 LET K-0 

120 IF A*-"GOOD" THEN LET D*~"T 
HANK YOU" 

130 IF A*""HI" OR A*""HELLO" OR 

A*="GOOD" OR LEN A*<2 THEN LET 
K*1 

140 IF LEN A*<2 THEN LET US-. 

"+AS+.IS NOT A SENTENCE" 

150 IF AS=»"HI" OR A*="HELLO" TH 


EN LET B*-"HELLO THERE" 

160 LET D*-"DO" 

170 IF LEN fl*<3 THEN GOTO 330 
ISO IF A*< TO 2>*"R " AND LEN A 
S<10 THEN LET 6*-"WHAT IS "+AS 
190 IF LEN ASK7 THEN GOTO 270 
200 IF ASK TO 4>-"F0R " OR A*< 
TO 7 >»"BECAUSE" UR A*< TO 3>-"T0 
" OR ASK TO 3>="SU “ THEN LET B 
S*"I SEE" 

210 IF RS< TO 4>»"STUP" THEN LE 
T B*»"ALL RIGHT" 

220 GOSOB 4000 

230 IF ASK TO 4>«"THE " OR AS< 
TO 4 >*"HIS “ OR ASC TO 4>-"HER " 
THEN LET BS—REALLY" 

240 IF 6#-"" THEN GOSUB 5000 
250 IF A*< TO 3>"WE " THEN LET 
B*-"UHO DO YOU MEAN BY WE" 

260 IF ASC TO 2)**" I " THEN GOSU 
B 1000 

270 IF LEN A*<5 THEN GOTO 290 
280 IF LEN A*>8 AND AS< TO 4>-“ 
THEY" THEN GOSUB 7O00 
290 IF LEN AS>7 AND ASK TO 3>=" 
HE " OR AS< TO 2 >■"IT" OR AS< TO 
3 >»"SHE" THEN GOSUB 2000 
300 IF LEN AST'S AND ASK TO 0>«" 
YOU" THEN GOSUB 3000 
310 IF LEN AS>4 THEN GOSUB 460 
330 IF A$-"NU" THEN LET B*-"WHY 
NOT" 


335 IF AS-"YOU" THEN LET BS-"WH 
AT ABOUT ME" 

340 IF AS—YES" THEN LET B*-"WH 
Y » 

345 IF AS-"ME" THEN LET BS-"WHA 
T ABOUT YOU" 

350 IF AS="THANK ME" THEN LET B 
*=■"1 AM ONLY FOLLOWING ORDERS" 

360 IF AS-"I KNOW" THEN LET BS= 
•GOOD" 

370 IF 8*-"" THEN LET BS-AS 

375 IF PEEK 16398+256*PEEK 1639 
3>PEEK 16396+256*PEEK 16397+693 
THEN CLS 

360 PRINT “ ME : —"; 

390 IF BS-AS AND RND<.7 OR RND' 
.2 AND LEN BS+LEN CS<18 THEN PRI 
4T "ER .."} 

400 PRINT 8S; 

410 iF BS— REALLY" AND RND<. 5 0 
R RND>.65 AND LEN BS+LEN CS<25 T 
HEN PRINT " "it*; 

420 IF ASK’ "THANK ME" AND BSO" 
GOOD" AND BSO" I SEE" AND BSO"R 
LL RIGHT" AND KOI THEN PRINT "? 

430 IF AS-"THANK ME" OR e*-"I S 
EE" OF: BS-"ALL RIGHT" OR BS="GOO 
D" OR K-l THEN PRINT 

440 LET BS-"" 

450 GOTO 70 

460 IF AS< TO 4 >-"YOUR" THEN LE 


H OLDING an intelligent con¬ 
versation with your 16K ZX- 
81 may seem a remote 
possibility but this program by Simon 
Parker of Leeds makes that possibility 


closer than any other which has yet 
been submitted to Sinclair Programs. 

Type-in your side of a Conversa¬ 
tion and the computer responses will be 
displayed on the screen. The program 


will give a sensible answer to the ma¬ 
jority of your questions and can even 
cope with philosophical points such as 
“What is the meaning of life?” or “Why 
did the chicken cross the road?” 


CQNYEF 


T 6*-"I KNOW" 

470 IF A*< TO 4 YOUR" THEN LE 
T K-l 

480 IF A*C TO 4)-"LOTS" THEN LE 
T B*-"SUCH A3" 

490 IF A*< TO 3>-"MY " THEN LET 
B*»"Y0UR"+A*<3 TO > 

500 IF A*< TO 3>»"ME " THEN LET 
B*-"YQU"+A*< 3 TO > 

900 RETURN 

1000 IF A*<3 TO 4 >="AM" THEN LET 
B*»"WHY ARE Y0U"+A*<5 TO > 

1002 IF A*< 3 TO 5>»"CAN" THEN LE 
T B*-"HOW CAN Y0U"+A*<6 TO > 

1005 IF ASK 3 TO 5 :—"WRS" THEN LE 
T B*-"WHY WERE Y0U"+A*<6 TO > 

1007 IF ASK 3 TO 5 >*"DID" THEN LE 
T B*-"WHY DID YOU"+A#< 6 TO > 

1008 IF A*(3 TO 4>-"D0" AND B*-" 
" THEN LET B*-"WHY DO Y0U"+A*<5 
TO > 

1020 IF ASK 3 TO 7 >*"COULD" THEN 
LET B*="HOW COULD YUU"+A*<8 TO > 
1030 IF A*<3 TO 6 >="HAVE" THEN L 
ET B*«"WHY HAVE Y0U"+A*<7 TO > 
1840 IF A*<3 TO 7 WROTE" THEN 
LET B*-"WHY DID YOU WRITE"+n$<3 


TO > 

1890 IF 6*-"" THEN LET 8*-"WHAT 
"+D*+" YOU" + ASK2 TO >+" FOR" 

1900 RETURN 

2010 IF ASK 5 TO 6IS" THEN LET 
B*-"WHAT IS IT THAT MAKES HER " 
+A*<7 TO > 

2830 IF ASK 4 TO 7>-"D0ES" THEN L 
ET BS-"WHY DOES "+A*< TO 2>+A*(8 
TO > 

2Q35 IF ASK 5 TO 8>="D0EG" THEN L 
ET B*-"WHY DOES SHL"+ASC9 TO > 
2040 IF A*<4 TO 6>»"CAN" THEN LE 
T B*="HOW CAN " +A*< TO 2>+R*<7 T 
0 > 

2050 IF ASK 5 TO 7>="CAN" THEN LE 
T B*-"HOM CAN SH£"+R$<0 TO > 

2060 IF B*-"" THEN LET B*-"WHY I 
S IT THAT "+A* 

2900 RETURN 

3000 IF ASK 5 TO 7>-"APE" THEN LE 
T B*-"WHY AM I"+A*<8 TO > 

3010 IF A*<5 TO 8>-"WERE" THEN L 
ET B*-"WHY WAS I"+A*C9 TO > 

2020 IF A*<5 TO 8>-"HAVE" THEN L 
ET B*-"WHY HAVE I"+ASK9 TO > 

3030 IF ASK 5 TO 9 >="WOULD" THEN 


LET B*-"WHY WOULD I"+A*<10 TO > 
3040 IF A*<5 TO 7 ’‘-"DO " THEN LE 
T B»="WHAT DO I"+A*<7 TO >+" FOR 

3050 IF A*<5 TO 7>""CAN" THEN LE 
T B*-"HOW CAN I"+A«8 TO > 

3080 IF B*-"" THEN LET BSs-"WHAT 
"+D*+" I"+A« 4 TO >+" FOR" 

3090 RETURN 

4000 IF ASK TO 4 '—"WHAT" OP ASK 
TO 3 >-"WHO" THEN LET B*-"I DO NO 
T KNOW" 

4005 IF ASK TO 3>-"WHY" THEN LET 
B*-"BECAUSE THAT IS THE WAY IT 
IS" 

4010 IF ASK TO 3>-”UHERf:" THEN L 
ET B**"OVER THERE SOMEWHERE" 

4020 IF A*< TO 3 >-"ARE" OR A*''. T 
O 5 >* f "WlLL " THEN LET B*-"PROE)AB 
LY" 

4030 IF ASK TO 5 COULD" OR A*< 
TO 4>»"CAN " THEN LET B*-"I DOU 
BT IT" 

4C’40 IF A*< TO 5>«"D0 YO" THEN L 
ET B*="I MIGHT DO" 

4050 IF ASK TO 3 >«"HOW" OR A*( T 
0 4 >-"WHEN" THEN LET B*-"WHAT DO 
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5050 FOR F-4 TO L 

5055 IF A<F>—1 THEN LET A*~A*< 

TO r-1‘>+"YOU ,, +A1s<F+l TO > 

5060 IF 0<F>-1 THEN LET A*"*A*< T 
r, R-1 >+ " YOUR " +A*< F+2 TO > 

5062 IF A<F>-3 THEN LET A*-n*< T 
0 F-l>+"YOU"+fl*<F+2 TO > 

5065 IF A<F>»2 THEN LET A*»A*< T 
0 F—3 >+"MY"+A*< F+l TO > 

5067 IF R<F>-4 THEN LET A*-A*< T 
O F-2>+"ME"+A« F+2 TO ) 

5070 NEXT F 

5075 IF K>2 THEN LET 15 

"+A*<K+1 TO '•+" LIKE" 

5077 LET K-O 

5000 IF R*< LEN rtf ‘-"S" AND B*< T 
0 4 >*"WHAT" THEN LET B*-"UHftT AR 
C'+BIk 0 TO ■ 

6000 IF n*<l>=- M " THEN LET 0*-"“ 
6020 RETURN 

7O0O IF A*<6 TO 0 ■-"HAVE" THEN L 
F T r*-"MHV HAVE THEY"+A*< 10 TO • 
7010 IF A*<6 TO 8>* M ARE" THEN LE 
T B*-"WHY ARE THEY"+A*<9 TO > 
7020 IF B* ,r "" THEN LET B*-"WHY » 
+D*+" THEY"+A*(5 TO > 

7900 RETURN 


0010 LET A*<l>•" I AM YOUR 2X81, 
AND I AH HERE" 

6020 LET A*(2 TODAY TO COMMONI 
CATE WITH YOU," 

8030 LET A*( 3 >»"AND MAKE YOU REA 
LISE JUST HOW" 

804O LET AIK 4 >~"MUCH THE WORLD 0 
F THE USERS" 

8050 LET A*<5INTERESTS ME." 
3060 LET A*C6>»" I HOPE I DO NOT 
SCARE YOU,AS" 

8070 LET A*<7>"I AM A VERY FRIE 
NDLY COMPUTER," 

0080 LET A*<-8:>-"AS YOU SHALL SCO 
N SEE." 

8110 FOR F«1 TO 8 
8115 FOR B-l TO 30 
8117 PRINT AT FT2+1,B;"" 

8120 PRINT AT F*2+l,B;A*<F,B> 

SI30 NEXT B 
8150 NEXT F 
8240 RUN 7 
9000 CLS 

9810 PRINT AT 10,1;"I DO NOT LIK 
E YOUR LANGUAGE" 

9020 PAUSE 150 
9030 NEW 


4060 IF B*=" “ THEN RETURN 
4070 IF B*<1X>T THEN LET K-l 
403O RETURN 
5800 DIM A<LEN A*'.' 

5805 LET B*-'" 

5910 FOR F-5 TO LEN A*-l 
5015 LET fltF '-O 

5020 IF RKF TO F+l >*"MY" THEN L 
ET A<F>=1 

5021 IF A*<F-1 TO F+l ME" THE 
N LET A< F >"3 

5023 IF AUCF-3 TO F+l>-"LIKE " 0 
R A*(F-3 TO F+l>-"LOVE " THEN LE 
T K-F 

5025 IF A#( F-2 TO F+l >»"'YOUR" TH 
EN LET A< F >>*2 

5027 IF W(F-1 TO F+l>-"YOU" THE 
N LET A< F >=»4 

5029 IF A*<F-1 TO F+lI " THE 
N LET A< F >■=—1 

5030 IF ASCLEN A*-l TO >"ED" OR 
A#( F-l TO F+l''-"ED " OR A*C F-3 

TO F+l)="UGHT " THEN LET 0*-"HR 
VE" 

5032 IF A*<F-l TO F+l>-"UFF" THE 
N GOTO 9O0O 
5035 NEXT F 
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Y OUR HORSE gallops round the 
race track, aiming to complete 
the course with as few faults as 
possible. Jumping over fences either too 
soon or too late adds four faults to your 
total. On the lower levels you are al¬ 
lowed a certain margin of error but on 
the top level you must always jump in 
exactly the proper place. Jump by press¬ 
ing “0”. 

Olympia was written for the 16K 
Spectrum by D Newton of Warrington. 

Graphics note: The signs in line 
30 should all be entered as shifted “3”s. 


ourMPu 


15 BORDER 7 PAPER 6- INK 0 

18 GO SUB 1800 

21 PRINT " OLYMPIA 

23 LET b=.002 LET hs=80' LET 
y =4 • LET 31=17 

23 PRINT AT 5.0;" LEVEL <H 
ARD>l-9<EASY> "• PAUSE 0 IF 

INKEY*< " 1" OR INKEY*>"9" THEN G 
0 TO 25 

26 LET P=VAL INKEY* 

27 CLS LET s=0 LET f=0 

28 PRINT AT 8,0; FLASH 1, "»* I 
NTERNATIONAL SHOWJUMPING W 

29 PRINT AT 4,5;"WINNING ROUND 
SO FAR";;h* 

30 PLOT 0,31■ DRAW 255,0' PRIN 
T AT 14,0;"£££££££££££ OLYMPIA £ 
£££££££££££" 

32 FOR c=0 TO 31 FOR v-9 TO 1 
3 PRINT AT v,c; INK 0; PAPER 5; 
"D" ' NEXT v NEXT c 

33 FOR 1=0 TO 31 - PRINT AT 19, 
1; INK 4;"E^■ NEXT 1 

35 FOR x»30 TO 0 STEP -1 PRIN 
T AT 17,x+1;" ";AT 17,x; INK 2;" 
C" 

40 PRINT AT 17,0;" " 

45 IF s=20 THEN GO TO 700' IF 
x=0 THEN GO TO 35 


50 PRINT AT a, a;"BA" 

60 IF x=6 THEN G0~5UB 300 
200 BEEP b, 10 = PAUSE 1 BEEP b, 
5 1 NEXT x 1 GO TO 35 
300 IF INKEY*="0" THEN PRINT AT 
20,0;"TOO EARLY 4 FAULTS"' LET 
f=f+4= GO TO 500 
305 PAUSE P*1.5 

310 IF INKEY*="0" THEN PRINT AT 
20,0;"JUST RIGHT" GO TO 500 
315 PAUSE P*1.3 

320 PAUSE 0' IF INKEY*="@" THEN 
PRINT AT 20,0;"TO LATE 4 FAULTS 
LET f-f+4 GO TO 500 
500 LET s=s+l 

505 PRINT AT j, 3 ;“ "> LET a=a- 

1 LET y=y+l PRINT AT a,a;"BA" 
507 PAUSE 5 — 

510 PRINT AT a,a;" " LET a=a + 

1 PRINT AT a,y,"BA; 

517 PAUSE 5 

520 PRINT AT a, a;" "> LET a=a + 

1> LET a=a+l PRINT AT a,a;"BA" 
530 PAUSE 5 
535 PRINT AT a,a;" 

540 LET a=a-3 1 PRINT AT a,a;"BA 

545 PRINT AT 20,0;" 


3' NEXT x 
550 GO TO 35 

700 IF f=0 THEN PRINT AT 1,0;"Y 
OIJ HAD A CLEAR ROUND, WELL DONE" 
720 PRINT AT 1,1;"HARD LUCK YOU 
COMPLETED THE ROUND WITH "; 
f;" FAULTS" 

725 IF f<hs THEN PRINT AT 5,1;" 
YOUR ROUND WAS THE BEST TODAY" 
PAUSE 50 LET hs=f 
730 PRINT AT 10,2;"PRESS ANY KE 
Y TO START AGAIN! "■ PAUSE O 
740 CD TO 23 

1000 FOR a=0 TO 7= READ s POKE 

USR "a"+a,S' NEXT a 

1010 FOR a=0 TO 7- READ s = POKE 

USR "b"+a,s 1 NEXT a 

1020 FOR a-0 TO 7 READ S' POKE 

USR "c"+a,s■ NEXT a 

1030 FOR a=0 TO 7- READ s POKE 

USR "d"+a,s NEXT a 

1040 FOR a=0 TO 7= READ s' POKE 

USR '>"+a,S' NEXT a 

1100 DATA 128,136,254,254,246,22 

4,96,160,0,1,49,13,31,15,26,34,2 

4.60,36,60,36,60,102,255,0,238,1 

70,170,255,17,85,85,24,36,60,98, 

126,36,60,24 

1500 RETURN 
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10 PRINT RT 10<6;"MRSTERDIMN" 

20 FOR N-0 TO 100 

21 NEXT N 

30 FOR F-0 TO 7 

40 PRINT RT F,14;" ";TAB 14 

) " 00 " ; TAB 14;"<9t '2*97 -9*>" 

30 NEXT F 

60 FOR N-0 TO 40 

61 NEXT N 

62 PRINT RT 8,15;"-" 

63 FOR N-0 TO 40 

64 NEXT N 

67 PRINT RT 6,15;"0" 

70 FOR C-8 TO O STEP -1 
60 PRINT RT G, 14; " 00 "; TAB 14 
;"<9t'2*97 9« >")TAB 14;"DIMN";TA 
B 14; " 

90 NEXT G 

100 PRINT RT 0,14;" ";TRB 14 

;" " ; TAB 14;" " 

110 FOR N-0 TO 40 

111 NEXT N 

l£0 FOR J-0 TO 7 
130 PRINT RT J,14;" ";TAB 14 

00 ";TAB 14;"C9t-2»97-9v>";TA 
B 14;"MIND" 

140 NEXT J 

150 FOR N-0 TO 40 

151 NEXT N 

152 PRINT RT 8,16;"-" 

153 FOR N-0 TO 40 

154 NEXT N 

155 PRINT RT 0,16;"0" 

160 FOR K-7 TO 0 STEP -1 

170 PRINT AT K, 14; " 00 ";TAB 14 
;"<9t'2*97 9w >";TAB 14;“ 

ISO NEXT K 

190 PRINT RT 0,14;" ";TAB 14 

200 FOR N-0 TO 100 

201 NEXT N 
210 CLS 

213 PRINT RT 0,1; "C28*96>" 

220 PRINT RT 9,1;"DO YOU WANT T 
0 SEE THE RULES < 

Y/N >" 

222 PRINT RT 11,1;"<28*97)" 

223 IF 1NKEY*<>"Y" AND INKEY*<> 
"N" THEN GOTO 223 

225 IF INKEY*-"" THEN GOTO 225 
230 IF INKEY*-"Y" THEN GOTO 600 

236 Pit I NT RT 12,0;*' 

237 CLS 

249 LET R-INT <RND*35>+2e 

250 LET B-INT <RND*35-+26 

260 LET C-INT <RND*35>+26 

261 PRINT AT 11,18; ‘<98 97 9r * 
P >5*96■98•97 9r V';TRB 10;"< »P 98 
• 97 ■ sP 95'3*sP 96■sP 99 97>";TAB 

10;“< SP 92 2*sP 5*97 sP 92 >":TA 
B 10;"C sP : 93 : S*sP 93 >" 

270 PRINT AT 12,15;"..." 

275 LET S-0 
260 INPUT ES 

281 IF E»-"2" THEN GOTO 460 

290 IF LEN t*< >3 THEN GOTO 2S0 

291 LET S-S+l 

300 IF ESC 1>=CHR* A THEN GOTO 4 
00 

310 IF E*< 2 .i-CHR* E THEN GOTO 4 
30 

320 IF E*C3>-CHRS C THEN GOTO 4 
60 

330 IF E*< 1 :'-CHRS 0 THEN GUTO 5 
00 

340 IF ESC 1>=CHR* B THEN GOTO 5 
00 

350 IF ESC 2 -CHR* A THEN GOTO 5 
00 

360 IF ESC 2 >—CHR* C THEN GOTO 5 
00 

370 IF ESC 3 )-CHR* A THEN GOTO 5 
08 

300 IF ESC 1>-CHR* A THEN GOTO 4 
0O 

310 IF ESC 2)=CHRS B THEN GOTO 4 
30 

320 IF ESC 3 )-C'HR* C THEN GOTO 4 
66 

330 IF ESC 1>-CHR* C THEN GOTO 5 
00 

340 IF ESC 1>=CHRS b THEN GOTO 5 
00 

350 IF ESC 2'—CHRS A THEN GOTO 5 
00 


HE COMPUTER chooses a se¬ 
ries of three numbers and letters. 
It is then for you to discover, in 
as few turns as possible, the computer’s 
series of numbers. 


370 IF ESC 3)-CHR* A THEN GOTO 5 
00 _ 

380 IF ESC3V(;HR£ B fPlEN GOTO 5 
00 

301 IF ESC 1X >CHR* A AND ESC 1X 
>CHR* B AND ESClX>CHRS C AND E* 
C 2 X >CHRS A AND E*C2X>CHR* B AN 
D ESC 2 X >CHRS C RND E*C3 X>CHRS 
A AND ESC 3 X>CHRS B AND ESC 3 ><>C 
HRS C THEN GOTO 9000 
390 GOTO 280 

400 PRINT AT 12,15;CHRS A 
430 IF ESC 2 >-CHRS B THEN PRINT 
AT 12,16;CHR* B 

460 IF ESC 3 >-CHRS C THEN PRINT 
AT 12,17;CHRS C 
470 GOTO 330 
405 COSUB 8060 

490 PRINT AT 15,0;"DO YOU WANT 
ANOTHER GAME <Y/N>" 

491 IF INKEYS-"" THEN GOTO 491 

492 IF INKEY*-"Y" THEN GOTO 210 

493 IF INKEY*-"N" THEN GOTO 700 
500 PRINT RT 19,0;"ONE RIGHT IN 
WRONG PLACE" 

505 FOR N-0 TO 40 

506 NEXT N 

508 PRINT RT 19,0;" 

510 GOTO 2R0 

6O0 PRINT RT 0,4;"- 

610 PRINT RT 1,4;“THE GAME OF M 
ASTERMIND" 

620 PRINT RT 2,4;"- 


630 PRINT RT 5,0;"THE COMPUTER 
THINKS OF R SERIES OF THREE NUMB 
ERS FROMC0 TO 9> AND LETTERS F 
ROMCA TO Y >" 

635 PRINT " 

640 PRINT AT 9,0;"YOU MUST CUES 
S THE COMBINATION IN AS FEW COE 
S AS POSSIBLE.WHEN INVITED YOU M 
UST ENTER A THREE NUMBER AND/OR 
LETTER SERIES AND FIND THE HI DO 
EN NUMBERS RND LETTERS" 

645 PRINT RT 14,7;" 

650 PRINT RT 16,0;"IF YOU ENTER 
""2"" WHEN YOU HRVE DISCOVERED 


Unlike conventional Mastermind 
games, this version, written by D Shaw 
of Nether Poppleton, York for the 16K 
ZX-81, relies as much on luck as on 
your skill in logic. 


THE SERIES THE CLEVERCOMPUTER W 
ILL TELL YOU YOUR SCORE" 

660 PRINT RT 21,0;" Press a 

rw to start " 

670 FOR N-0 TO 5 

671 NEXT N 

672 IF INKEYSO"" THEN GOTO 230 
680 PRINT RT 21,0;"**** PRESS R 

NY KEY TO START ****" 

690 FOR N-0 TO 5 

691 NEXT N 

692 IF INKEYSO"" THEN GOTO 235 
695 GOTO 660 

7O0 CLS 

710 PRINT RT 12,2;"***** RUF W1 
EDERSEHEN *****" 

720 FOR N-0 TO 50 
730 NEXT N 
740 GOTO 740 

8000 CLS 

8001 PRINT RT 5,5;"YOU HRD H ;S;" 
GOES" 

8005 IF S<=4 THEN PRINT RT 10,0; 
"DOES MAGNUS MRGNUSSON KNOW R80U 
TYOU...." 

9006 IF S<-4 THEN RETURN 

8008 IF S<8 THEN PRINT RT 10,0;‘ 

VERY GOOD EFFORT" 

6009 IF S<8 THEN RETURN 

8010 IF SCI! THEN PRINT RT 1O,0; 
"PRETTY GOOD" 

8011 IF S<11 THEN RETURN 

0012 IF S-ll OR S-12 THEN PrTnT 
RT 10,0;"NOT TOO BAD I SUPPOSE.. 

8013 IF Sei3 THEN RETURN 

8015 IF Sei7 THEN PRINT RT 10.0; 

"PERHAPS R LITTLE UNLUCKY" 

8017 IF Sei7 THEN RETURN 
9030 IF Se20 THEN PRINT RT 10,0; 
"PRETTY BAD REALLY...COULD DO 
BETTER" 

8033 IF S>19 THEN PRINT RT 10,0; 
"DO YOU REMEMBER YOUR NAME ?" 
8035 RETURN 

9000 PRINT RT 19,0;"SORRY,NONE 0 
F THOSE PLEASE TRY AGAIN" 

9001 FOR F-0 TO 40 

9002 NEXT F 

9003 PRINT RT 19,@;» 

9004 GOTO 280 

9998 SRVE "MASTERMINd" 

93*33 RUN 



360 IF E*e 2 >-CHR* C THEN GOTO 5 
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1 BRIGHT 1- INK 7- PAPER 0- B 
ORDER 0 CLS = PLOT 0,0 5 DRAN 25 
5,0- DRAW 0,17b- DRAW -255,O' DR 
AW 0,-175- LET hc~0 

2 LET cd~20- LET men*3 

3 LET c==0" LET x-0 

5 LET w=l 

10 DATA 0,0,BIN 00011000,BIN 0 
0111100,BIN 01011010,BIN 0101101 
0,BIN Olllll1G,BIN 01111110 

20 DATA 0,BIN 11110000,BIN 110 
O1000,BIN 11111100,B1N 11111100, 
BIN 11111000,BIN 11110000,0 

30 DATA BIN 01111110,BIN 01111 
110,BIN 01011010,BIN 01011010,61 
N 00111100,BIN 00011000,0,0 

40 DATA 0,BIN 00001111,BIN 000 
1001.1, BIN 001 111 11, BIN 00111111, 
BIN 00011 111,BIN 00001111,0 

50 DATA 0,BIN 00111100,BIN 011 
11110,BIN 01111110,BIN 01111110, 
BIN 01111110,BIN 00111100,0 

6*0 RESTORE 10« FOR d*144 TO 14 
8• FOR e=0 TO 7• READ 4 POKE US 
R CHR* <.d>+e,q = NEXT e NEXT d 
65 FOR f=1 TO 2G- PRINT AT INT 
<RND*20H1,INT <RND*30H1; FLAG 
H 1;"e"= BEEP .0O4, ( f-1NT < RND*4 
>>+l0- NEXT f 

70 LET a-INT <RND*20H1 = LET to 
= 1 NT < RND*30 ')+l 

75 PRINT AT a,to; FLASH l>"a"= 
FOR f=l TO 200= NEXT f- PRINT AT 
a, to; " " 

80 LET 

90 LET a*== INKEY* 

95 IF a**"" THEN LET a*=z* 

97 LET c=c+l : LET x=x+l : IF x* 
380 THEN GO TO 300 
100 IF INKEY** 8 " 7" THEN LET z*»" 
a" 

110 IF INKEY*=="8" THEN LET z*=" 
h" 

120 IF INKEY**"6" THEN LET z**" 
c" 

130 IF INKEY**“5" THEN LET z*=" 
d" 

140 PRINT AT a,b; OVER ljz* BE 
EP . 006, 15-w-*-10 
150 FOR 9*1 TO cd• NEXT 9 
165 IF z*="a" THEN LET a=a-l« P 
PINT AT a+1,to;"e" 


170 IF z**"b" THEN LET b*b+l* P 
RINT AT a, b-1"e" 

175 IF z*“="c" THEN LET a*a+l• P 
RINT AT a-1,to;V 
180 IF z**"d" THEN LET b*b-l= P 
RINT AT a,b+1;V 
185 IF a =“21 OR a~0 OR b*0 OR b= 
31 THEN GO TO 210 

190 IF POINT (. b#B+5, 175-a*8-4 >*• 
1 THEN GO TO 210 
193 LET w-u+1- IF w*7 THEN LET 
w* 1 

193 INK w 

800 GO TO 90 

210 PRINT AT a,h;z* 

220 FOR f*l TO 30- BEEP .004,IN 
T <RNDY20 >- PRINT AT a,b; FLASH 
1; "0" • NEXT f- CLS • LET mem^mem 
-1 

220 IF mem*0 THEN GO TO 260 
840 INK 7 PLOT 0,0 s DRAW 255,0 
• DRAW 0,175- DRAW -255,0- DRAW 
0,-175 

250 LET i,j— 1 : LET x*0 • GO TO 65 
260 INK 7 : PRINT INK 7;"BAD LUC 
K! ! ! You scored ''.; c" 

Points”- IF c>hc THEN PRINT 
AT 13,03 "Well done amywav... You 
have a hi9h score of " c LET 
hc“c 

265 IF c<he THEN PRINT INK 7;AT 
13,0.;” The h i 9h score is ";he 
270 INK 7 = INPUT "Do you want a 
mother 9o ?".;a* 

280 IF a*-"M" OR a$-"Y" THEN CL 
S • PLOT 0,0- DRAW 255,0- DRAW 0 
,175- DRAW -255,0= DRAW 0,-175 = 
GO TO 2 
290 STOP 

300 LET cd*cd-3 = IF cd<0 THEN G 
0 TO 340 

310 FOR f=l TO 100- NEXT f- CLS 
• PRINT INK 7) "Well dome you. sc 
ored emou9h Polmts to escape 

the fry elites. You. must mow try 

at a faster speed" 

320 FOR f*l TO 70Q= NEXT f= CLS 

= INK 7- PLOT 0,0= DRAW 255,0- 
DRAW 0,175= DRAW -255,0- DRAW 0, 
-175 
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325 LET x»0 

BEEP .3,0 

• PAUSE 2- BEEP .3,0 


33Q GO TO 65 

360 PRINT 

• PRINT = PRINT AT 

10 

340 PRINT INK 7;RT 5,0;"Well do 

,0; INK 7; 

"Do you. want another 

9 

Tie 1 ! ! You have beaten all. the 

ame ?" 



fry o1 1 tes. . « " 

370 INPUT 

a$ IF a$-"Y" OR a$ 

!*»« 

350 BEEP .15,0- BEEP .15,2- BEE 

y" THEN CL' 

INK 7- PLOT 0,0 = 

D 

P .15,4 BEEP .15,2- BEEP .15,0' 

RAW 255,0= 

DRAW 0,175* DRAW -2! 

55 

BEEP .15,2- BEEP .3,4- PAUSE 2' 

,0- DRAW 0 

,-175* GO TO 2 




















2S BORDER 6 INK 1 ! BRIGHT 1 
25 CLS 

27 GO SUB 6000' REM ** U.D.G. 
routine ** 

30 PRINT AT 4, 3j " ** Learnin9 
to Count ** - 


32 PRINT HT 10,0;"Press the co 
rrect number key, or ""a"" if 
sou want to know the answer..." 
35 PRINT AT 16,0, PRPER 3;" 
Press ans kes to start " 

40 PRINT £1;"8 R.M. Harris 
1983" 

50 PRUSE 0' CLS 
60 RESTORE 100' FOR z-1 TO 10' 
READ a* 

65 LET a-1 NT <RND*10> 

70 IF a<1 OR a>9 THEN GO TO 65 
100 DRTA "lorries","cuFs","flow 
ers","houses","9iraffes","boats" 
,"trees","PeoPle","clocks","keys 


105 PRINT "How mans ";a*;" are 
there ?" 

110 GO SUB 7000 

114 IF INKEY*<>"" THEN GO TO 11 

2 

115 IF INKEYS-STR* a THEN GO TO 
1000 

117.IF INKEY*-"a" THEN GO TO 20 
00 


118 GO TO 115 
120 STOP 
150 NEXT a 

1000 PRINT RT 21,8; FLASH l;a;” 
is CORRECT !" 

1001 GO SUB 1002- GO TO 1005 

1002 FOR 9-5 TO 50 BEEP .015,9 
NEXT 9 

1003 RETURN 
1005 CLS 
1010 NEXT z 
1012 GO TO 9000 

2003 PRINT RT 20,0;"THERE ARE 
a;" ";a* ; FOR i-1 TO 150 NEXT i 
GO SUB 1002 
2005 CLS 
2010 NEXT z 
2012 GO TO 9000 

5999 STOP 

6000 PRINT FLASH 1;RT 10,8;"STOP 
THE TAPE" RESTORE 6100 

6010 FOR d-1 TO 18 READ d* FOR 


e-O TO 7 READ f' POKE USR d$+e 
* f : NEXT e NEXT d 
Cl00 REM ***UDG HERE*** 

6200 DATA "a",0,0,62,38,126,126, 
127,48 

0,254,254,254,25 


C",0,0,124,127,125,12 
d",24,36,74,186,154,8 
*",0,16,16,200,54,24, 
f",1,7,31,127,32,45,3 
128,228,252,254,4, 


6210 DATA 
4,254,102 
6220 DATA 
7,124.56 
6230 DATA 

4.36.24 
6240 DATA 
16,16 
6250 DATA 
3,63 

6255 DATA "< 

180,132,252 

6260 DATA "h",0,48,112,16,16,16. 
16, 16 

6265 DATA "i",16,16,16,30,31,17 
18,18 

6270 DATA "J",0,0,0,60,31,31,15, 
7 

6275 DATA "k", 128,128,128,128,25 
2,248,248,232 

6280 DATA "l",24,60,126,255,255, 
254,126,104 

6285 DATA "m",8,8,8,8,8,8,8,28 
6290 DATA "n",56,56,56,16,254.18 
6,186,186 

6295 DRTA "o",186,186,56,56,40,4 
0-40.108 - - 

6300 DATA "P",255,145,145,145,13 
7,133,131,255 

6305 DATA "4",24,62,62,119,119,6 

2.62.24 

6310 DATA "r",0,0,0,255,255,7,5, 
5 

6320 PRINT AT 10,8;" 



counting 


C OUNTING is an educational 
program designed to help young 
children to learn to count. Pic¬ 
tures are displayed on the screen and 
the child is asked to count them and to 
press the appropriate key. If the ques¬ 


tion proves too difficult, pressing “a” 
will provide the correct answer. 

Richard Harris of Eastbourne, Sus¬ 
sex, wrote the program for the 16K 
Spectrum and he says his three-year-old 
sister enjoys playing it. 


6358 RETURN 


7000 IF z-1 THEN LET 
7005 IF z-2 THEN LET 
7010 IF z-3 THEN LET 


9*="ab." 

9$="c" 

9*=^' 


LET 


7015 IF z-4 THEN LET 9S-"f9" 

7020 IF z=5 THEN LET 9*-"h"' LET 
h*-"i" 


7025 IF z-6 THEN LET 9«="jk" 

7030 IF z-7 THEN LET ■ LET 

h$*"m” 

7035 IF z-8 THEN LET 9*«"n"< LET 
h»-"o" 

7040 IF z-9 THEN LET 9$=”P" 

7050 IF z-10 THEN LET 9»-"qr" 
7100 IF z-1 OR z-2 OR z-4 OR z-6 
OR z-9 OR z-10 THEN PRINT RT 9, 

0;. PLOT 0,75- DRAW 255,0 PL 

OT 0.98' DRAW 255,0' FOR x-1 TO 
a' PRINT ; INK INT <RND*6>'9*;" 


";' NEXT x- RETURN 
7190 LET 9-10. LET h-0 
7195 PLOT 0,75' DRAW 255,0- PLOT 
0,98' DRAW 255,0 
7200 FOR y-1 TO *• PRINT AT 9,h; 
INK INT <RND*6>;9*;AT 9+l,h;h* 
LET h-h+3= NEXT y- RETURN 

8999 STOP 

9000 FOR s-0 TO 9' BEEP .1,s NE 
XT s' BEEP .5,15' PAPER 6 CLS 

PRINT AT 11,10; FLASH 1;"WELL D 
ONE ! " 

9020 PRINT "■''"Another 9o ? <y 
>*s or < n 

>o" 

9025 IF INKEY*-"y" OR INKEY*-"Y" 
THEN RUN 30 

9030 IF INKEY*-"n" OR INKEY*="N" 
THEN STOP 
9040 GO TO 9025 
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DON’T MISS 
^yTHIS INCREDIBLE 
^X^SINCLAIR 

y , vX PROGRAMS 
m //TV/) OFFER 


txc\« s ' ve 

For use with 
ZX-81/ZX-80 


IK RAM is 
enough to 
obtain 8 
colours. 


Easy to connect 
Direct Basic INPUT 
TEXT and colours 
simultaneously. Plug 
directly in your 
Sinclair connector. 


Add More Appeal 
to your ZX-81 
(and ZX-80) thanks to the 
DDC Colour Interface* 


Compatible 
with all the 
memories. 


And at a realistic price of 
only £29.95 ( + £2.95 p&p) 
usually £39.95 


Save £10 on X 

a DDC 

colour interface. A special 
offer open 
to readers of 
Sinclair Programs^/ 


* Compatible with many 
Quicksilva and Artie software, 


Limited 
stocks, so 
place your 
order soon, 



Allow 28 days 
for delivery. 


The prices apply to United Kingdom only. 
Overseas orders can be accepted but there will be 
an extra postal charge. The full price can be 
obtained on application to ECC Publications at the 
address on the coupon. 


To: Sinclair Programs Special Offer, 

ECC Publications, 30-31 Islington Green, London, Nl 8BJ 

Please send me-DDC Col. J at the special Sinclair User price of 

£29.95 plus £2.95 p&p. 

Please tick if you require a VAT receipt □ 

*1 enclose a cheque/postal order payable to DDC for £_ 

‘Please charge to Access/Barclaycard/Trustcard account no.__ 

•Wuate dclelftJcamplot. •< applKabla 

Signature_^_ 

Name Mr/Mrs/Miss_ 

Address__ 




What the 
experts say: 

Sinclair User ‘.'quality'’ 

•USE AND LEARN 
Sinclair User "excellent value” 

What M iCrO "TREMENDOUSLY VALUABLE... 
GET THE BEST OUT OF SPECTRUM BASIC” 

ZX Computing “excellent a great 

ASSET. ..FANTASTIC VALUE.. .VERY HIGHLY 
RECOMMENDED” 

•THE DATABASE 

Sinclair User. . :‘excellent value” 

MicroDecision .. .“of all the database-type 

PROGRAMS AVAILABLE,MiCROLS SEEMS 
THE BEST VALUE.. MORE FOR YOUR MONEY" 

•THE SPREADSHEET 

Personal Computer News easy 

TO USE... PLENTY OF USES... STREETS AHEAD” 
(OFGEMINI'S SPREADSHEET) 

Sinclair User, “excellent value ... much 

CLEARER” (THAN VU-CALC) 

What Micro "quality" 


BBC & SPECTRUM SPREADSHEETS 
Now with45Page“Spreadsheeting 
Course”Manual+4 FREE Ready- 
to-use Models 

THE DATABASE & THE SPREADSHEET 
Now Available With Special Features, for 
BBC 32K. Please ’phone or write for 
Information & Prices. 


MiCROL 

Order TODAY for fast 
convenient delivery 




USE AND LEARN 

Your perfect Spectrum starter Kit. 

25 original BASIC programs you 
can use immediately, PLUS 118 
page manual to help you get the 
most from your 16or48K Spectrum. 

25 programs include: 

Music Composer, World Atlas, 

Computer Term Glossary,Screen 
Designer, Star Maps - PLUS 
games and powerful routines to 
use in your own programs: 
graph-drawing, text-editing, 
sorting, searching and much 
more. 118 page manual 
includes detailed description 
of programming techniques, full 
listings of all programs, and articles to 
develop your own program-writing skills. 

“Excellent" A.R. West, Surrey. "First-time loading, 
user-friendly, superb documentation" J.E. Mann, Leeds. 



THEDATABASE 


Whether you want to update mailing 
lists, manage customer accounts, or 
simply produce an index of your 
record collection, THE DATABASE 
makes it easy and enjoyable. 

A breakthrough in power and 
practicality, THE DATABASE 
allows you to store information 
on any subject in the way you 
want, and gives you a full range 
of commands to display, update, 
sort, search and print 
- even perform calculations. 

Massive storage capacity: 

1,000 lines in memory at a timei 
over 7,000 names and addresses on a 
single C90 cassette. See for yourself why 
THE DATABASE is the most advanced 48K Spectrun^ 
database available - far more powerful and practical 
than Sinclair’s VU-FILE and all other “competitors". 



THE SPREADSHEET 

Based closely on Visicalc, the world’s 
best-selling program, 

THE SPREADSHEET turns your48K 
Spectrum into a "super-Calculator" 
that helps you solve all kinds of 
number-based problems quickly 
and easily. Hundreds of 
applications in business, 
engineering and science - and 
just as versatile for home finance 
management. Invaluable in 
education too, helping develop 
maths ability and confidence. 

In power, flexibility and ease 
of use, THE SPREADSHEET 
outperforms all other Spectrum 
spreadsheets - including Sinclair’s 
VU-CALC. See for yourself, with the security of 
MiCROL’S 14 day money-back Guarantee. 

To order: (UK Orders Only). 

Simply complete the coupon, 
and FREEPOST with your cheque, 
made payable to MiCROL (UK Mailorder). 

All products normally available from 
stock and despatched by return. 

Credit Card Orders: By phone 9-5.30 
Mon to Fri. stating name and address, 

Card No. and item(s) required. 



THE WORD PROCESSOR 

The only full feature, professionally- 
written word processor for 48K 
Spectrums. Use it to produce memos, 
letters, reports 

- THE WORD PROCESSOR has 
the features you need, including 
flexible editing, justification, 
centering, and automatic "word 
wrap”. Simplicity itself to use, 

THE WORD PROCESSOR uses 
the same "what you see is what 
you get” principle as word 
processors costing hundreds of 
pounds more. 30,000 character 
storage capability for real-work 
applications, and it's easily adapted to 
work with full size printers. Once again, 
MiCROL sets the standard in serious 
Spectrum software. 



r 


Post to:- MiCROL (UK Mail Order) Freepost 

38 Burleigh Street, Cambridge CB1 1BR 

Please send me.copy/copies of USE AND LEARN j 

Please send me.copy/copies of THE DATABASE 

Please send me.copy/copies of THE SPREADSHEET 

Please send me.copy copies of THE WORD PROCESSOR 


MCROL 

38 Burleigh Street, Cambridge CB11L,,.. 

( 0223)312453 [ 


I riease sena me.copy/copies ot I Ht WUHU PROCESSOR _ 

I enclose cheque/P.O. for.(£9.95 50p p p-£10.45 total each) M 

Or I wish to pay by Access/Barclaycard/Visa 


Or I wish to pay by Access/Barclaycard/Visa 

Card Number. 

Please print name and address 


Credit Card 
holder's signature.. 


. 


























m 


That is just a fraction of what you get from Sinclair 
Programs. Each month we have 40 programs for owners of 
ZX80s, ZX81s and Spectrums. But make sure you don’t 
have to hunt TOO far for your bargains— Sinclair 
Programs always sells out quickly, so order ' 

yours TODAY from your newsagent, or fill _ 

in the form below and we will send ... 1 ^ c e 
it direct to you, L s ue3" p 

every month. . 


Reach an estimated readership of over 200,000 users 
per month for as little as £2.00*. 

Or if you are starting your own small business advertise in the supermart 
for only £10.00. 

Yes ail you have to do is fill in the coupon below including your name, 
address and/or telephone number and send to: Supermart, Sinclair User, 
ECC Publications. 30-31 Islington Green, London N1 8BJ. 

Maximum 30 words. 

Your advert will appear in the earliest possible edition. 


BARGAIN-HUNTERS 
READ THIS! 


Whatever your model of Sinclair computer—you can get 
HOURS of fun, intellectual satisfaction and education for just 
95p per month! 


A bargain? 

That’s Sinclair Programs magazine—the fat, glossy 
magazine that's PACKED with original, tested programs for 
you to load and run. 


With Sinclair Programs every month you can build the 
library of programs that suits your mood: in recent issues 
we have challenged our readers with programs to test their 
skill at Sharpshooter or Laser Cannon . . . jolt their brain 
cells with Quadratic Equation or Monster Maths ... or take 
a practical turn with their own word processor program or 
graphic generator. 
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The Galaxy’s FIRST 
ever computer comic! 

Zooming into touchdown at WM Smiths, John Menzies and other good newsagents now 
and every fortnight ... only 40p. 

Order your copy TODAY! 

Bursting with great new comic strips ... exciting stories ... astounding facts ... 
big prizes... competitions... fascinating quizzes... star personalities. 

And that's just the start of Britain's newest brightest most fun-pacHed comic ever! 

LOAD RUNNER 



Its the only comic for the age of the computer 
itputsth^estbacH with the dinosaurs! 



SEND CHEQUE OR P.O. 
TO P.S.S.452 STONEY STANTON RD. COVENTRY CV6 5DG. 
FOR INSTANT CREDIT CARD SALES TEL (0203)667556 
TRADE ENQUIRIES CONTACT JOHN FLETCHER. COVENTRY (0203) 667556 


RS.S.THE FUTURE MAKERS 

FANTASIES FOR ZX81 AND SPECTRUM 
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